1. Информатика
  2. Ввести на экран все 4-х

Ввести на экран все 4-х значные числа делящиеся на 15 ( 9 класс) program

Vova52026 Vova52026    2   08.10.2019 00:50    0

Ответы
davidbezhasny0 davidbezhasny0  10.10.2020 03:07

program senya;

var

a1, a2, a3, a4: integer;

begin

for a1 := 1 to 9 do

for a2 := 0 to 9 do

for a3 := 0 to 9 do

for a4 := 0 to 9 do

if (a1 * 1000 + a2 * 100 + a3 * 10 + a4) mod 15 = 0 then

writeln (a1,a2,a3,a4);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
vladrifeyt1 vladrifeyt1  15.06.2019 20:00
Задано число n . найти количество чётных цифр....
СарварИбрагимов11 СарварИбрагимов11  15.06.2019 20:00
Слогической по информатике, шестеро друзей в ожидании электрички заскочили в буфет в котором: 1)маша купила себе тоже самое, что и егор 2)аня купила тоже, что саша, но не стала...
deadloxSasha deadloxSasha  15.06.2019 20:00
1. составить программу входе которой определяется входит ли цифры 4 или 7 в данной 2х значное число. 2.составить программу входи работы которой определяется является ли данное...
viking0899 viking0899  13.02.2022 08:16
Переменная str: * O целая переменная о логическая переменная символьная строка вещественная переменная...
jamashkinpavel jamashkinpavel  13.02.2022 08:20
Python Проверь программу, которая по возрасту определит, чем должен заниматься пользователь: учиться в детском саду, школе, ВУЗе или работать. a = input( введите возраст: )...
23245086 23245086  13.02.2022 08:24
4. Составить программу на языке Python по блок-схеме алгоритма и найти ответ начало х=7 y=1 2=x+y C=X-Y d=x+y вывод 2, c, d конец ответ:...
ananas2106 ananas2106  13.02.2022 08:26
По примеру паскаль.Нужно сделать B и D(нудно написать программу....
АнгелинаМанакова АнгелинаМанакова  13.02.2022 08:27
Что из перечисленного не относится к схеме? Туристический маршрут Золотое кольцо России Фотография местности Географическая карта...
boosoosv boosoosv  13.05.2020 19:31
Несколько веб страниц с общей темой и содержанием , связанных между собой гипперссылками, образуют: 1. а)портал б)альбом в)сервер г)веб-канал д)веб-сайт? 2. может ли рисунок...
SampleText SampleText  13.05.2020 19:31
надо Дана программа: var s, k: integer; begin readln(s); readln(k); if s = 2 * k then writeln(‘ДА’) else writeln(‘НЕТ’) end. Было проведено 9 запусков программы, при которых...

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