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

274

419

Посмотреть ответы 2

Ответы на вопрос:

AnastasiyaEstDetey

Информатика

4,4(79 оценок)

Var a,b,c,d,res: integer; begin writeln('введите первое число'); readln(a); writeln('‚введите второе число'); readln(b); writeln('введите третье число'); readln(c); writeln('‚введите четвертое число'); readln(d); res: =a; if b< res then res: =b; if c< res then res: =c; if a< res then res: =d; writeln('—ёб«® ',res,' б ¬®ґ ¬ «ґмє®ґ'); readln; end. мог бы и побольше поставить)