alexeylipatov

06.11.2022

Знатокам программирования! Переписать программу из паскаля в лазарус var n, i, a, max: integer; begin readln(n); max := -1; for i := 1 to n do begin readln(a); if (a mod 5 = 0) and (a > max) then max := a; end; writeln(max) end.

Информатика

Ответить

Ответы

info126

06.11.2022

Лазарус - это одно из множества IDE (программа, где можно писать код) для паскаля.

Выполнить его можете только Вы сами, после установки Lazarus :)

https://lazarus-rus.ru/download/

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Знатокам программирования! Переписать программу из паскаля в лазарус var n, i, a, max: integer; begin readln(n); max := -1; for i := 1 to n do begin readln(a); if (a mod 5 = 0) and (a > max) then max := a; end; writeln(max) end.

▲

Знатокам программирования! Переписать программу из паскаля в лазарус var n, i, a, max: integer; begin readln(n); max := -1; for i := 1 to n do begin readln(a); if (a mod 5 = 0) and (a > max) then max := a; end; writeln(max) end.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

1)Выполните перевод: а)33511⁶-?⁷ от (а) до (и)

Запишите команду для создания однотабличной БД Customers.

Блок схема кофе автомата с наличкой и картой. минимум 4 вида кофе

Квадратное уравнение в abc pascal готовое нужно ! заранее спасиbо ) ; * задали а я все проболел

Для изображения объёмных тел невидимые ребра рисуют особыми линиями. Как называются такие линии?

Какой тип имеет переменная h, если после выполнения оператора write (h) на экран было выведено следующее: 1392?

Багандардын аныктауга болатын ен мумкин ман

Даны три действительный числа а б с найти наибольшее из чисел 10а+2б+с и 2абс/3 и вывести текст эксель!

Даны множества A={1, 2, 3, 4, 5, 6, 7} и B={4, 6, 8}. Перечислите элементы, образующие множества C = A ∪ B и C = A ∩ B. Изобразите множества А, В и С (A ∪ B и A ∩ B) графически.

Запиши число 13583 в развёрнутом виде, начиная со старшего разряда.

Знатокам программирования! Переписать программу из паскаля в лазарус var n, i, a, max: integer; begin readln(n); max := -1; for i := 1 to n do begin readln(a); if (a mod 5 = 0) and (a &gt; max) then max := a; end; writeln(max) end.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

1)Выполните перевод: а)33511⁶-?⁷​ от (а) до (и)

Запишите команду для создания однотабличной БД Customers.

Блок схема кофе автомата с наличкой и картой. минимум 4 вида кофе

Квадратное уравнение в abc pascal готовое нужно ! заранее спасиbо ) ; * задали а я все проболел

Для изображения объёмных тел невидимые ребра рисуют особыми линиями. Как называются такие линии?​

Какой тип имеет переменная h, если после выполнения оператора write (h) на экран было выведено следующее: 1392?

Багандардын аныктауга болатын ен мумкин ман

Даны три действительный числа а б с найти наибольшее из чисел 10а+2б+с и 2абс/3 и вывести текст эксель!

Даны множества A={1, 2, 3, 4, 5, 6, 7} и B={4, 6, 8}. Перечислите элементы, образующие множества C = A ∪ B и C = A ∩ B. Изобразите множества А, В и С (A ∪ B и A ∩ B) графически.

Запиши число 13583 в развёрнутом виде, начиная со старшего разряда.

Знатокам программирования! Переписать программу из паскаля в лазарус var n, i, a, max: integer; begin readln(n); max := -1; for i := 1 to n do begin readln(a); if (a mod 5 = 0) and (a > max) then max := a; end; writeln(max) end.

1)Выполните перевод: а)33511⁶-?⁷ от (а) до (и)

Для изображения объёмных тел невидимые ребра рисуют особыми линиями. Как называются такие линии?