Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
лера21091
04.02.2022 12:05 •
Информатика
1. найти сумму первых 10 чисел, кратных 7; 2. вывести на экран 11 первых чисел кратных 5; 3. составить программу рисования 18 прямоугольников синего цвета, координаты которых определяется случайным образом, а стороны равны а=140, b=40.
Показать ответ
Ответ:
nastyaturchina
27.06.2020 01:54
1)
var
k,i:integer;
begin
while i<=10 do
begin
k:=k+1;
if k mod 7 = 0 then
begin
writeln(k);
i:=i+1;
end;
end.
2)
var
k,i:integer;
begin
while i<=11 do
begin
k:=k+1;
if k mod 5 = 0 then
begin
writeln(k);
i:=i+1;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Артем222211
16.02.2021 11:28
При составление расписания уроков на один день учителя и высказали свои пожелания. желает иметь или первый или второй урок. просит поставить ему или первый или...
olgastavovaya1
02.08.2020 08:50
Вова, Саша, Игорь и Афанасий занимаются в разных спортивных секциях. Один из них играет в баскетбол, другой — в волейбол, третий — в футбол, четвёртый — в регби....
ALEXDEMI777
19.11.2020 09:00
Реферат на тему: разновидности компьютерных сетей...
вика2832
04.01.2020 06:09
Add the story: Some see this as a superpower, I see this as a curse ... 5-7 offers...
lalka137
04.01.2020 06:09
Практичне заняття 1. Людський вимір війни: демографічні зміни в УРСР ответы...
yaanny0304
04.01.2020 06:09
ІІІ. Запишіть правильно слова, знімаючи скісну риску. Кінець/кінцем, уві/сні, воєнно/морський, сама/самотою, суспільно/корисний, всесвітньо/історичний, віч/на/віч,...
MadMax818
19.12.2021 18:43
Методы временной остановки кровотечения на месте происшествия включают (выбрать правильное сочетание): 1) наложение давящей повязки, асептической повязки 2) пальцевое...
CrazyBananaa
19.12.2021 18:43
Постройте тритоны в до диез миноре гармоническом с их обращениями...
DENUCKS
19.12.2021 18:43
Решите уравнение: 101N+1 = 101N + 1 (N-основание системы)...
XУЙ228228
11.09.2022 09:05
На рисунке представлен график зависимости пройденного пешеходом пути от времени. Определите по этому графику скорость пешехода через 3 с после начала движения....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
k,i:integer;
begin
while i<=10 do
begin
k:=k+1;
if k mod 7 = 0 then
begin
writeln(k);
i:=i+1;
end;
end.
2)
var
k,i:integer;
begin
while i<=11 do
begin
k:=k+1;
if k mod 5 = 0 then
begin
writeln(k);
i:=i+1;
end;
end.