1. Информатика
  2. Найти произведение чисел

Найти произведение чисел в диапазоне от 1 до 23 с шагом 3. т.е. 1, 4, 7,

ILYA3421 ILYA3421    1   22.07.2019 02:00    1

Ответы
VasiliyLihasdb VasiliyLihasdb  23.09.2020 13:04
Var i,b:integer;

begin

b:=1;

i:=1;

while i<23 do begin

b:=b*i;

i:=i+3

end;

print(b);

end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
суперМозг777 суперМозг777  19.12.2020 16:38
Програми для роботи з мультимедійними данними: плеєр, операційна система, конвектор, аудіостудія чи веб-браузер...
2006marusya 2006marusya  31.05.2021 12:00
надо в программе С++ по информатике Необходимо протабулировать функцию у на заданном отрезке, затем записать в одномерный массив B все значения х, а в целочисленный массив C –...
черныйЗайка черныйЗайка  31.05.2021 12:09
Напишіть фрагмент процедури масштабування висот фігур для зручної візуалізації великих чисел​...
aimuratsergei1234 aimuratsergei1234  06.07.2019 18:20
Решить ! с клавиатуры вводятся натуральные числа. признак конца ввода – отрицательное число. посчитать сумму всех нечетных чисел....
зара120 зара120  06.07.2019 18:30
:у вас есть доллары. вы хотите обменять их на рубли. есть информация стоимости купли-продажи в банках города. в городе n банков. составьте программу, определяющую, какой банк выбрать,...
Cesar123213 Cesar123213  06.07.2019 18:30
Какой оператор записан правильно? а) a: =13g б) y: =p: =t в) k: =3: d г) c: =23*h...
DUGLASMORFINI DUGLASMORFINI  06.07.2019 18:30
Решить как-то раз ниф-ниф, наф-наф и нуф-нуф засиделись допоздна в гостях у наф-нафа в его соломенном домике, а тут как тут голодный волк. когда он начал ломать соломенный домик...
stich3918 stich3918  19.04.2021 14:08
ответить на вопросы, хоть на какие, буду очень благодарен.. Задание 1 Вопрос: Какие служебные слова применяются для записи цикла с постусловием Выберите несколько из 4 вариантов...
NiceSaid NiceSaid  19.04.2021 14:10
программирование питон. не могу понять как сделать так, чтобы после того как первый раз ввёл не число, потом ничего не высвечивалось. никаких потом Введите число:​...
beknurr546ozpknp beknurr546ozpknp  21.05.2021 09:14
Скільки разів буде виконано ітерацію циклу:for x in range (50) ?​...

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