tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти количество натуральных
Найти количество натуральных чисел в диапазоне от 50 до 99 кратные 3 и 7
anyakoi
2 11.06.2019 00:10
1
Ответы
tanyaraeva2017
09.07.2020 07:18
Program z7;
var i,w:integer;
begin
w:=0;
for i:=50 to 99 do begin
if (i mod 3 = 0) and (i mod 7 = 0) then
w:=w+1;
end;
writeln(w);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Сасаев
04.02.2021 23:17
Ребят, кто разбирается в Turbo Pascal, нужно вычислить сумму ряда с этим заданием!...
ВикаФан
04.02.2021 23:19
1. Какие виды роботов появятся в будущем? 2. Каковы польза и вред от использованияроботов в жизни человека?3.Чем роботы первого поколения отличаются от роботов...
Chillin
04.02.2021 23:19
ДО ТЬ БУДЬ ЛАСКА) Програмування. ...
SvetaX16X
04.02.2021 23:32
с задачами по информатике Желательно с пояснением >...
ученик11111023531
04.02.2021 23:49
Напишите консольную программу, в которой пользователь вводит номер с клавиатуры. Если число одновременно меньше 9 и больше 2, программа выводит Число больше 5 и меньше...
angel32b
04.02.2021 23:55
Напишите программу на C++ Если с Сб-Вс, то выходной Если с ПН-Пт, то какая пара? 1-4 название пары 5-1000 нету пары...
Lana111111111111
05.02.2021 00:04
расшифровать скорее всего двоичный код... 000011100010111100011010000011100010111000101110000011100010111100011010 0000111000101110001000010001010000001110001011100010110000001110001011100...
dhristenko8
05.02.2021 00:08
Запишите оператор для введения действительной переменной а с компонента Edit...
carrot4
05.02.2021 00:08
Банк в зависимости от суммы Вклада начисленные проценты по Вкладу могут варьироваться. Напишите консольную программу, в которой пользователь вводит сумму депозита. Если...
lholkina
05.02.2021 00:11
ИНФОРМАТИКА 7 КЛАСС, НА PYTHON ЧЕРЕЗ IF...
Популярные вопросы
Мәтінді оқы. Мәтін мазмұны бойынша жоспар құр. Прочитай текст. Составьте...
2
надо записать неравенством условие.фото прикрепила ниже....
3
Present Simple or Present Continuous 1. She (ride) a bike every day....
3
чи існує пряма залежність між наявними природними ресурсами і рівнем...
3
Ребята с физикой решение и ответ...
3
Прослушай аудиотекст. Предположи, что, с точки зрения пеликанов,...
1
как делать? Одна сторона четырёх угольника больше каждой следующей...
3
Здравствуйте с математикой, Решите уравнения(2 столб)...
2
Лабораторна з фізики номер 1 за 9 клас сиротюк...
2
Византиямен турик каганатынын максаты...
2
var i,w:integer;
begin
w:=0;
for i:=50 to 99 do begin
if (i mod 3 = 0) and (i mod 7 = 0) then
w:=w+1;
end;
writeln(w);
end.