Напишите Программы 1) последовательности чисел 0,5,10....1000 2) Предложите ввести три действительных числа а б с. Определите среди них максимальное
Напишите Программы
1) последовательности чисел 0,5,10....1000
2) Предложите ввести три действительных числа а б с. Определите среди них максимальное
Гость
Ответ(ы) на вопрос:
Гость1) Условие неполное. Что делать с числами 0, 5, 10 ... 1000?
2)
var a,b,c,max: integer;
begin
writeln('Введите 3 числа через пробел:');
readln(a,b,c);
if a>b then max:=a else max:=b;
if c>max then max:=c;
writeln('max=',max);
end.
Не нашли ответ?
Похожие вопросы