Информатика: Решите на языке paskal дано 3 числа. найти наименьшее из них.

andrievskiyvitaliy

15.04.2023 23:05

Информатика

Есть ответ 👍

Решите на языке paskal дано 3 числа. найти наименьшее из них.

244

295

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

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

ОляХ1

Информатика

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

Var a,b,c,min: integer; begin writeln('введите 1 число'); readln(a); writeln('введите 2 число'); readln(b); writeln('введите 3 число'); readln(c); min: =a; if b < min then min: =b; if c < min then min: =c; writeln(min); end.