Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Составьте программу в паскале,в которой нужно найти наименьшее из двух чисел

Ответ оставил Гость

Program f1;

var a,b,max, min:real;

begin 

writeln (vvedine chisla);

readln (a,b);

if (a>b) then (a:=max) else a:=min;

writeln (max=,max , min=,min);

readln;

end.