Напишите программу которая выводит на экран :min (a,b)min-минимальное значениеПо теме программы паскаль точнее турбо паскаль
Напишите программу которая выводит на экран :min (a,b)
min-минимальное значение
По теме программы паскаль точнее турбо паскаль
Гость
Ответ(ы) на вопрос:
ГостьProgram programma;
Uses crt;
var a,b,min: real;
Begin clrscr;
write('Введите a = ');
readln(a);
write('Введите b = ');
readln(b);
if a>b then
min:=b
else
begin
if a