Задание: Напишите программу, которая в последовательности чисел определяет максимальное число, оканчивающееся на 1. На вход программа получает числа: 3, 11, 21, 31. Количество чисел не превышает 1000. Величина чисел не превышает 30000.
Я пишу программу:
var n, a, i:integer;
begin
readln(n);
min(n) :=30001; (вот здесь он ругается "нельзя присвоить левой части")
for i:=1 to n do
begin
readln(a);
if (a mod 16 = 0) and (a then min:=a;
end;
writeln(min);
end.
Что не так??? Объясните И если есть еще ошибки, исправьте
Интерактивная программа - это компьютерная программа, для работы которой требуется взаимодействие с пользователем. Это взаимодействие может включать в себя ввод информации, изменение информации, управление информацией или иное манипулирование данными. Большинство программ являются интерактивными.
Примером таких программ может быть «Логика для малышей»,Baby Logics, Cifiri, «Развиваем память», Монтессори, "Веселые Картинки" — инструментальный пакет для создания и решения задач, связанных со сборкой на экране упорядоченного множества объектов текстовой и графической структуры и т. д.