Войти Регистрация Спроси ai-bota

Вывести все двузначные числа кратные 7. pascal abc

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

Sazon1000

07.05.2022 02:10

Составить программу формирования массива: ...

кемпінг

10.04.2021 16:49

Реши задачу. (ответ округли до целых).Книга содержит 144 страниц. На каждой странице 38 строк. В каждой строке 59 символов (включая пробелы). Найти информационный объём...

tuzor

28.12.2020 06:32

Продолжи: Оси в трёхмерном моделировании обозначены:...

90125

04.01.2020 06:26

Ввод: a, b, h 2. Начало цикла Для х= a, b, h повторить: Проверка условия: Если _х 0, то _Y=2x+3, иначе _Y=-2x+1, конец если Вывод x,y конец цикла 3. Конец #include using...

natakubkina78

14.11.2022 15:27

Складіть проект, у якому виконавець зменшить свій образ на 10, якщо до виконавця доторкається вказівник миші, переміститьсявправо на 100, якщо натиснуто клавішу стрілка...

пппп104

02.01.2023 14:02

Дано натуральное число n,в котором все цифры различны.найти остаток от деления максимальной цифры на минимальную цифру данного числа....

Bamper1

22.06.2020 20:42

Впаскале: ввести целое число и определить, верно ли, что в нём ровно 1 цифра 9. плз!...

Юль4ик11

19.02.2022 22:09

Нужно пошаговое решение и правильный ответ...

diahochka

14.02.2022 12:13

ИНФОРМАТИКА СОР В ОНЛАЙН МЕКТЕП ПРОГРАМИРОВАНИЕ РЕШЕНИЙ . Определите вид ветвления(полное или неполное) и результат выполнения программы. ...

Mokikoo

13.08.2020 15:04

8. Определи, какие числа куда нужно вписать, чтобы робот нарисовал правильный восьмиугольник в среде Open Roberta Lab - программирование online с Lego EV3. СОР...

Ответ:

Innochka098

01.10.2020 17:09

Program abc;
var a:integer;
begin
for a:=10 to 99 do
if a mod 7=0 then
writeln(a,' ');
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку