1. Информатика
  2. Вывести трехзначные числа

Вывести трехзначные числа кратные 7 используя while pascal

SchillerAlice SchillerAlice    2   04.09.2019 03:30    1

Ответы
Illia1Z 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 adamoon44  08.09.2019 13:10
Хочу проверить правильно ли я расшифровал азбуку морза -**-**--*** на игач правильно или нет ответ...
Retro2122 Retro2122  24.09.2019 01:40
Учитель задал как открыть инкогнито режим на компьютере. информатика...
ArtemkaRus71 ArtemkaRus71  24.09.2019 01:40
Программа которая будет складывать переменную а с числом 3. при этом пока сумма будет меньше чем 25 требуется увеличить переменную а на одну еденицу в каждом цикле...
Мишаня1721 Мишаня1721  24.09.2019 01:40
Написать программу, которая задает массив из 5 чисел, которые вводит пользователь, а затем выводит на экран эти числа, возведенные в куб...
Kazybek2005 Kazybek2005  14.04.2020 04:18
Как должна выглядеть блок-схема деления двух чисел столбиком?...
юлия1628 юлия1628  20.09.2019 06:40
Между числами 6 и 49 разместить 5 чисел на равном расстоянии и вывести весь ряд на экран. paskal abc...
mrtimkarov mrtimkarov  20.09.2019 06:40
Написать программу для вычисления предела последовательности an=n/(n+1)...
Alex228345290 Alex228345290  03.10.2019 08:26
Определите, возможно ли установить на диск d: вашего пк программный продукт размером 1.7 гб. решение напишите в отчет.​...
kolyafedosov kolyafedosov  16.06.2019 22:10
С: рассмотрите рыбу(любую).объясните,какое значение имеет форма её тела....
IrinaErmolenko IrinaErmolenko  16.06.2019 22:10
Названия стран откуда финикийцы приносили товары и что....

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