Имеется четыре произвольных числа a, b, c, d, которые вводятся с клавиатуры. Программа должна давать ответ на вопрос: «Правда ли что первое число меньше остальных" c циклами while repeat
Имеется четыре произвольных числа a, b, c, d, которые вводятся с клавиатуры. Программа должна давать ответ на вопрос: «Правда ли что первое число меньше остальных" c циклами while repeat
Гость
Ответ(ы) на вопрос:
ГостьVar a,b,c,d,k,f,flag: integer;
begin
readln(a,b,c,d);
repeat
K:=k+1;
Case k of
1: f:=b;
2: f:=c;
3: f:=d;
end;
If a
Не нашли ответ?
Похожие вопросы