Циклы (for and while), помогите составить программу в Pascal ABC, пожалуйста?

Информатика | 5 - 9 классы

Циклы (for and while), помогите составить программу в Pascal ABC, пожалуйста.

Составьте программу, которая выводит на экран количество трехзначных чисел у которых вторая цифра в два раза больше первой, а третья в два раза больше второй.

Ответить на вопрос
Ответы (1)
Dzozulenko 28 окт. 2020 г., 03:16:50

Var

n, k : integer ;

t, v, p : real ;

begin k : = 0 ; for n : = 100 to 999 do begin p : = n div 100 ; v : = (n div 10)mod 10 ; t : = n mod 10 ; if (v = 2 * p) and (t = 2 * v) then k : = k + 1 ; end ; print(k) ;

end.

GeorgePixelz 12 окт. 2020 г., 20:50:40 | 5 - 9 классы

Составьте программу вычисления количества трехзначных чисел, у которых первая цифра меньше третей на 1?

Составьте программу вычисления количества трехзначных чисел, у которых первая цифра меньше третей на 1.

Прошу, срочно.

Lollal1 16 февр. 2020 г., 13:00:11 | 10 - 11 классы

Напишите пожалуйста программу на pascal?

Напишите пожалуйста программу на pascal.

Составьте программу, которая выводит на экран сумму чисел кратных 5 - и от 30 до 60.

Цикл repeat.

Evashva 22 нояб. 2020 г., 02:20:56 | 5 - 9 классы

Составить программу, которая запрашивает предложение и выводит на экран все его буквы "и"?

Составить программу, которая запрашивает предложение и выводит на экран все его буквы "и".

Программу составить при помощи Pascal ABC.

Sabrinakotsk1 27 сент. 2020 г., 00:02:27 | 5 - 9 классы

Составить программу, которая выводит на экран в обратном порядке нечетные числа от 29 до 1 в Pascal ABC?

Составить программу, которая выводит на экран в обратном порядке нечетные числа от 29 до 1 в Pascal ABC.

Составить программу, которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.

GlebovichPolinka 22 дек. 2020 г., 15:42:26 | 10 - 11 классы

Pascal abc Написать программу, которая вводит с клавиатуры строку и выводит на экран символ, код которого в два раза больше, чем количество символов в исходной строке (использовать функции Length и ch?

Pascal abc Написать программу, которая вводит с клавиатуры строку и выводит на экран символ, код которого в два раза больше, чем количество символов в исходной строке (использовать функции Length и chr).

Olgaskachkova 2 янв. 2020 г., 02:44:16 | 5 - 9 классы

Составьте программу вычисления количества трехзначных чисел, у которых первая цифра меньше третей на 1?

Составьте программу вычисления количества трехзначных чисел, у которых первая цифра меньше третей на 1.

Прошу, срочно.

Жранкель 28 февр. 2020 г., 01:03:04 | 5 - 9 классы

Составьте программу (в Pascal ABC), которая выводит на экран дату в рамке ?

Составьте программу (в Pascal ABC), которая выводит на экран дату в рамке :

RIKA555 9 июн. 2020 г., 10:08:41 | 5 - 9 классы

Составить программу для нахождения количества таких трехзначных чисел Фибоначчи, которые делятся на сумму своих цифр нацело?

Составить программу для нахождения количества таких трехзначных чисел Фибоначчи, которые делятся на сумму своих цифр нацело.

Программа - Pascal ABC.

Люся129 15 нояб. 2020 г., 05:33:52 | 5 - 9 классы

Составьте программу которая выводит на экран квадраты n первых натуральных чисел?

Составьте программу которая выводит на экран квадраты n первых натуральных чисел.

Kuksa3452 7 сент. 2020 г., 01:13:00 | 10 - 11 классы

Написать программу, которая выводит на экран первые 5 нечетных чисел?

Написать программу, которая выводит на экран первые 5 нечетных чисел.

C + + через for, помогите пожалуйста.

Вы зашли на страницу вопроса Циклы (for and while), помогите составить программу в Pascal ABC, пожалуйста?, который относится к категории Информатика. По уровню сложности вопрос соответствует учебной программе для учащихся 5 - 9 классов. В этой же категории вы найдете ответ и на другие, похожие вопросы по теме, найти который можно с помощью автоматической системы «умный поиск». Интересную информацию можно найти в комментариях-ответах пользователей, с которыми есть обратная связь для обсуждения темы. Если предложенные варианты ответов не удовлетворяют, создайте свой вариант запроса в верхней строке.