Составьте программку выводящую на экран большее из 5 чиселПрограмма из Кумира

Составьте программку выводящую на экран большее из 5 чисел
Программка из Кумира

Задать свой вопрос
1 ответ
Сделал через массив

program Project2; 
APPTYPE CONSOLE
uses  SysUtils;
const n=4;
var a:array [0..n] of integer;max,i:Integer;
begin 
for i:=0 to n do 
 readln(a[i]); 
min:=a[0];
 for i:=0 to n do 
if a[i]gt;max then   
max:=a[i]; 
Writeln(max); 
readln;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт