tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вывести трехзначные числа
Вывести трехзначные числа кратные 7 используя while pascal
SchillerAlice
2 04.09.2019 03:30
1
Ответы
Illia1Z
06.10.2020 16:07
Var n: integer;
begin n := 100; while (n <= 999) do begin if n mod 7 = 0 then write(n, ' '); n += 1; end;end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
adamoon44
08.09.2019 13:10
Хочу проверить правильно ли я расшифровал азбуку морза -**-**--*** на игач правильно или нет ответ...
Retro2122
24.09.2019 01:40
Учитель задал как открыть инкогнито режим на компьютере. информатика...
ArtemkaRus71
24.09.2019 01:40
Программа которая будет складывать переменную а с числом 3. при этом пока сумма будет меньше чем 25 требуется увеличить переменную а на одну еденицу в каждом цикле...
Мишаня1721
24.09.2019 01:40
Написать программу, которая задает массив из 5 чисел, которые вводит пользователь, а затем выводит на экран эти числа, возведенные в куб...
Kazybek2005
14.04.2020 04:18
Как должна выглядеть блок-схема деления двух чисел столбиком?...
юлия1628
20.09.2019 06:40
Между числами 6 и 49 разместить 5 чисел на равном расстоянии и вывести весь ряд на экран. paskal abc...
mrtimkarov
20.09.2019 06:40
Написать программу для вычисления предела последовательности an=n/(n+1)...
Alex228345290
03.10.2019 08:26
Определите, возможно ли установить на диск d: вашего пк программный продукт размером 1.7 гб. решение напишите в отчет....
kolyafedosov
16.06.2019 22:10
С: рассмотрите рыбу(любую).объясните,какое значение имеет форма её тела....
IrinaErmolenko
16.06.2019 22:10
Названия стран откуда финикийцы приносили товары и что....
Популярные вопросы
Составьте план к сочинению на тему повесть тарас бульба...
3
Поставьте знак больше или меньше так, чтобы получились верные неравенства...
1
Составьте схему древние верования человека и в ней кратко запишите...
2
Найдите разность 8/15 - 1/2 4/7 - 3/10 19/100 - 1/10 3/5 - 11/25...
3
Как решить пример: 2х3-2а+7с+11+5а-7в-14+2в умножить на 3; если...
1
Укажите политические и хозяйственные особенности развития земель...
2
Власна частота коливань матеріальної точки 10 гц амплітуда кооивань...
1
Айтылуы мен жазылуында айырмашылық бар сөзді тап а)күләш в)құндыз...
2
Что земля притягивает сильнее килограмм пуха или килограмм гвоздей...
3
Заменить лесной опушки словосочетанием со связью...
1
begin n := 100; while (n <= 999) do begin if n mod 7 = 0 then write(n, ' '); n += 1; end;end.