Регистрация
Крис5942314613
06.12.2022 14:54
Информатика
Есть ответ 👍

S:= 0;
m:=5:
for i:=2 to m do
s:=s+i;

282
368
Посмотреть ответы 1

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

НастяЛитвинюк
НастяЛитвинюк
4,8(18 оценок)
Даны два числа, а найти минимум из не совсем понял программа находит минимальное из трех чисел введенных с клавиатуры function m(a,b : integer): integer; begin   if a< b then     m : = a   else   m : = b; end; var  a, b, c : integer; begin   write('a: '); readln(a);   write('b: '); readln(b);   write('c: '); readln(c);   write('minimum: ', m(m(a,b),c)); end.

Популярно: Информатика