Войти Регистрация Спроси ai-bota

Паскаль вывести на монитор все трёхзначные числа кратные 25

Показать ответ

Ответ:

musinda

02.07.2020 06:53

Var i:integer;
begin
for i:=100 to 999 do
if i mod 25=0 then write(' ',i);
readln;end.
Вроде так :)

0,0(0 оценок)

Популярные вопросы: Информатика

KittyClab

19.12.2020 13:44

Задание 3:Определи символы, соответствующие десятичному коду, и расшифруй данные слова. а) 087 111 114 100; б) 068 079 083; в) 080 097 105 110 116 098 114 117 115 104....

ivankisa12

17.02.2022 12:01

Какова функция оперативной памяти компьютера...

HamzaT5050

13.09.2020 13:37

Чему равно значение переменной с после выполнения алгоритма? а:= 14;б:=19;с:=б-а;с:=SORT(c) ;...

ледезе

05.11.2020 02:31

створіть проект в якому можна обчислити суму, різницю, добуток, частку, від ділнння двох довільних дійсних чисел залежно від установлення позначок прапорців....

LIZA123456789011

08.10.2021 18:01

20 div 7 22 mod 8 17 div 2 88 mod 14 36 div 5 Найти значения выражения...

Matthew0500

17.12.2020 08:39

мне нужно отправить до 5 вечера...

dianapopova1879

28.03.2023 06:17

Запусти Pascal. Введи программу. program pr_1; var x,y,sum, umn: integer; begin write ( x= ); readln (x); write ( y= ); readln (y); sum:=x+y; umn:=x*y; writeln ( sum= ,sum); writeln...

pRoToTyPe95wF

01.03.2023 11:33

Какого типа таблиц не существует? 1.Таблица типа Объекты-свойства 2.Свойства-свойства - объекты 3.Объекты-свойства-объекты 4.Объекты-объекты-несколько 5.Объекты-Объекты-один...

police5

30.09.2022 17:38

6. Приведены запросы к поисковому серверу. Для каждого запроса указан его код — соответствующая буква от А до Г. Расположите коды запросов слева направо в порядке возрастания...

oxxximiro1

13.05.2021 19:23

Создать 3 программы для этих графиков на С++...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку