logo
Войти Регистрация Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
ррраша
ррраша
19.10.2021 18:46 •  Информатика

Винтервале от 1 до 100 натуральных чисел вывести числа делящиеся на 5. напишите в паскаль и если можно схему.

Показать ответ
Ответ:
ДашаааDidek
ДашаааDidek
03.10.2020 15:11

var i:integer;

begin

for i:=1 to 100 do

if i mod 5=0 then write(i,';' );

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Karina902
Karina902
04.03.2023 16:08
Как называться совокупность всех программ...
77788899
77788899
03.07.2022 03:45
Какой минимальный объeм памяти необходим для хранения одной точки изображения в котором 128 различных цветов?...
romakim02kum
romakim02kum
29.08.2021 20:49
Дан условный оператор: if a 5 then c: =1 else if a 5 then c: =2 else c: =3 какое значения имеет переменная a, если в результате выполнения условного оператора переменной с...
Dasha1648938190
Dasha1648938190
23.04.2020 22:27
Укажите виды обработки информации, направленные на получение новой информации....
МарияЧархчян
МарияЧархчян
23.04.2020 22:27
Program qq; const n=5; var a: array[1..n] of integer; i,imax: integer; begin writeln( исходный массив: ); for i: =1 to n do begin a[i]: =random(100)+50; write(a[i]: 4); end;...
dashazoriksv
dashazoriksv
23.04.2020 22:27
Сколько раз будет выполнен цикл? а) for i: =0 to 15 do s: =s+1; б) for i: =10 to 15 do s: =s+1; в) for i: = -1 to 1 do s: =s+1; г) for i: =10 to 10 do s: =s+1; д) k: =5? for...
zaprudnov98
zaprudnov98
23.04.2020 22:27
Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию....
Asil1231
Asil1231
31.01.2020 09:01
Даниил задумал число 12 до 139. сколько битов информации содержится в сообщении даниил задумал число 32...
revunova
revunova
19.09.2021 08:41
Составие программу,которая печатает да , если слово содержит букву е и нет , если не содержит . отладку выполнить для слов : предмет и колонна...
nhxjjxjx
nhxjjxjx
28.10.2020 17:05
Ахан пытается сделать свою первую трехмерную модель на основе прямоугольника. Определи какой инструмент сделать из него 3D модель. Линия Вдавить/Втянуть Выбрать Переместить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота