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

Найти произведение всех целых чисел от 8 до 15 написать программу в q-basic

ksp86450 ksp86450    1   05.06.2019 17:00    8

Ответы
Ааааааааввв Ааааааааввв  06.07.2020 06:15
P = 1
FOR I = 8 TO 15
    P = P * I
NEXT I
PRINT "P="; P
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
mariach1 mariach1  24.06.2019 01:50
Как вывести цифровой корень числа? язык с....
artemsteam1234oz40fw artemsteam1234oz40fw  24.06.2019 01:50
Вдвумерном массиве заменить все четные элементы на их квадраты, а нечетные удвоить...
tasikmk09 tasikmk09  23.06.2019 23:51
Sample input: 95_f73_cсам код: import stringf = input()c = input()if f== 95_f : f = 95if c== 73_c : c = 73f = float(f)c = float(c)print(5/9*(f - 32))print((9/5*...
lenawer lenawer  24.06.2019 01:40
За какое наименьшее количество операций найти и заменить все двух подряд идущих пробелов одним мы сможем избавиться от лишних пробелов?...
DdMirko DdMirko  24.06.2019 01:40
Одноклеточная амеба каждые 3 часа делится на 2 клетки. определить, сколько клеток будет через 3, б, 9, 24 часа? (basic)...
Shkolaetopolniyad Shkolaetopolniyad  24.06.2019 01:40
Построить таблицу истинности. y=(a+b*c)+(не a*c)...
ЮляФранк2105 ЮляФранк2105  24.06.2019 01:40
Ввести любое значение х,если он меньше либо равен 0,то у равен 5х^5-sinx в паскале надо решить...
Волк123111 Волк123111  24.06.2019 01:40
Слабораторной работой, 1.справедливо ли утверждение, что недостаточная информация является дезинформацией? ответ поясните. 2.в чем разница между избыточной и дублирующей...
DoctorVatson1 DoctorVatson1  24.06.2019 01:40
Дан рекурсивный алгоритм: procedure f(n: integer); begin writeln( * ); if n 0 then begin f(n-3); f(n-2); f(n div 2); f(n div 2); end end; сколько символов звездочка...
Temka333333 Temka333333  24.06.2019 01:40
Алгоритм вычисления значений функций f(n) и g(n), где n – натуральное число, задан следующими соотношениями: f(1) = 1; g(1) = 1; f(n) = f(n–1) – 2*g(n–1), g(n)...

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