Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
uses crt; var
a,b,c,min: integer; begin writeln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел: ',min); end.
1+2+3-4+5-6=1
1+2+3+4/5+6-7=1
1+2+3-4+5-6+7/8=1
Популярные вопросы