1. Информатика
  2. Напечатать на экране компьютера

Напечатать на экране компьютера все числа в диапазоне от 1 до 100, делящиеся на 13

alinapvby alinapvby    3   02.06.2019 08:10    0

Ответы
nik19991 nik19991  03.07.2020 06:28
Var i:integer;
begin
for i:=1 to 100 do
begin
if i mod 13 = 0 then writeln (i);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
small2005 small2005  08.08.2019 01:00
Что больше 250 кб - 1024 б или 249 кб можно с объяснением...
Aaaaaarrrrr55 Aaaaaarrrrr55  30.07.2019 07:30
Напишите программу,которая при вводе координат точки x и y,выдает сообщение о принадлежности точки заштрихованным областям...
Жека331211 Жека331211  30.07.2019 07:30
Написать программу в pascal используя циклы. а)s квадратов чисел от 1 до n+1. б)p кубов чисел от 1 до n-5. в)частное от деления s на p. записать это все в одну программу....
саша8038 саша8038  30.07.2019 07:30
Дан массив из 20 натуральных чисел. составить программу суммы элементов, кратных данному числу d ....
olesyasa1 olesyasa1  30.07.2019 07:30
Какой объём видеопамяти в килобайтах нужен для хранения изображения размером 640 х 250 пикселей, использующего 16-цветную палитру?...
AlecsandrPonkratov77 AlecsandrPonkratov77  16.08.2019 12:30
Много лучший ответ обязательно выберу 1 какие признаки объекта называют существенными ? пример 2 2-3 примера слов-омонимов, выражающих одно понятие 3 каким чаще всего...
Dgkdtjclhvkyulvlu Dgkdtjclhvkyulvlu  16.08.2019 12:30
Сколько клавиш на клавиатуре компьютера?...
reyuatnrf reyuatnrf  16.08.2019 12:30
Главная программа которая работой компьютера...
ILYA3421 ILYA3421  16.08.2019 12:30
Главная программа которая работой компьютера...
wexly wexly  16.08.2019 12:20
Қандай терезелердің мəзір жолдары, жиыру және жаю батырмалары жоқ? а)бума терезелерінің в)қосымшалар терезелерінің с)сұхбат терезелерінің д)анықтама терезелерінің...

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