Ввели 4 числа найти наименьшее из них
язык кумир​

dfcbktw dfcbktw    3   17.10.2019 13:37    13

Ответы
Didi12EW Didi12EW  05.08.2020 08:27

var a, b, c, d, e: integer;

begin

writeln('Введите число')

readln (a);

readln (b);

readln (c);

readln (d);

if e<a then e:=a;

if e<a then e:=b;

if e<a then e:=c;

if e<a then e:=d;

writeln(e);

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика