1. Информатика
  2. Напишите программу в abc

Напишите программу в abc pascal для нахождения произведения чисел, кратных 5, находящихся в промежутке от 2 до 25.

rkdkeidkoks61 rkdkeidkoks61    2   02.10.2019 10:02    1

Ответы
rafik14 rafik14  09.10.2020 11:32

var i, a: integer;

begin a:=1;

        for i:=2 to 25 do

        begin  

                 if (i mod 5)=0 then a:=a*i;

        end;

        writeln(a);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
alinaommuk alinaommuk  16.10.2019 17:33
Напишите программу в python 3.6, которая определит прямоугольный треугольник или нет...
Vika7928728272 Vika7928728272  16.10.2019 17:31
Найти корень данного уравнения на отрезке [0, 1] с точностью 10-3: а) метод итераций. составить блок-схему и программу на языке бейсик алгоритма решение уравнения: 4х3+9х-3=0...
MegaTanker MegaTanker  16.10.2019 17:30
Составьте программы рисования символов «е», «п», «б», «ч». «ц», «ш», а также других фигур, состоящих из горизонтальных и вертикальных отрезков. на проверку нужно прислать алгоритмы...
Всеникизаняты11 Всеникизаняты11  13.07.2019 22:50
Решить в среде pascal: 1) написать простенький калькулятор через ввод строки, который на входе получает строку вида число1 знак операции число2 (например, 2 + 5 или 3 / 42 ), а выводит...
Рома228119 Рома228119  13.07.2019 11:30
За сколько секунд можно передать файл размером 580 кбайт,если скорость канала связи равна 15 мбит\сек?...
maroreya maroreya  29.05.2023 23:47
26 Составление блок-схеми по условию Фирма набирает сотрудников от 21 до 35 лет ключительно. Внести возраст человека и определить, подходит ли он фирме (вивести ответ...
shopsms982 shopsms982  29.05.2023 23:48
Яким інструментом в середовищі Microsoft Word потрібно скористатись для поєднання окремих елементів зображення в єдиний обєкт ?...
valeriasweets valeriasweets  29.05.2023 23:50
Як називається обєкт редактора векторної графіки який можна уявити як прозорий аркуш із зображень геометричних обєктів ьа малюнків ів...
Enot811 Enot811  29.05.2023 23:59
Задание 4 26 Составить блок-схему p-1: i=3 while i...
зари6а зари6а  20.04.2020 18:40
У исполнителя Скибиди две команды, которым присвоены номера: 1. привавь b 2. умножь на 2 (b – неизвестное натуральное число; b ≥ 2). Выполняя первую из них, Скибиди увеличивает число...

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