Напишите программу, в которой осуществляется ввод целых чисел

Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен ноль) и определениемаксимального (наибольшего) из введеных чисел. Используйте оператор repeat. Решить в паскале.

в избранное

milkin

14 марта 2023

program findmax; const n=10; varmax,i: integer; beginmax: =-1111; repeat beginreadln (i); if max < i then max: =i; end; until i=0; writeln (max); end. i — вводимое число

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Составить программу которая увеличивает значение выражения

(х-1) (х-3) (х-7) х… х (х-63) / (х-2) (х-4) (х-8) х… х (х-64) составить программу в турбо паскале

В группе учится n учащихся. Определить самого высокого ученика. Вывести его рост и порядковый номер посписку

ПОМОГИТЕ! В некоторой стране автомобильный номер длиной 7 символов составляют из заглавных букв

Дано натуральное число N. Найти сумму цифр этого числа. (Qbasik)

ПОМОГИТЕ ХОТЬ ЧТО МОЖИТЕ ОЧЕНЬ ПРОШУ 1. У исполнителя Калькулятор две команды, которым присвоены номера:…

Даны 3 числа. Найти среднее арифметическое квадратов этих чисел

Помогите пожалуйста! Найдите x: 1) 8 в степени x битов=32 Кбайт 2) 16 в степени x битов=128Кбайт

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: