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

Question

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

1.Составьте программку которая вычисляет творение натуральных чисел кратных 23 в спектре от 100 до 620
2.Найти творенье чисел от 11 до 6
3.Найти значение функции на отрезке [8;4] с шагом -0,2
сделайте пожалуйста 1 и 2

Задать свой вопрос

Анна Багнюкова
Информатика
2019-03-30 07:00:38
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

Напишите xоть одну цепь питания. Неживая природа-растения-Травоядные животные-Xищные

будьте любездны помоч

Более прочная хим связь имеет место в молекуле:1)F2 2)Cl2 3)O2 4)N2Объясните,

нсзови придметы, ижображённыйе на картинах. В каких словах ударение падает

Найдите величайшее значение функции: [tex]y= 2^-1-4x-x^2 [/tex]

В чем подвиг Александра Невского? (Невская битва и Ледовое побоище)

помогите пожалуйста решит

Безотлагательно!!!!! Химия 10 класс, задачаопределите объем воздуха с объемной частей кислорода

придумайте коментирующую часть и поставьте ее в середину прямой речи после

Найдите сумму первых 5 членов геометрической прогрессии (bn) где b1=9 q=-1/2

Инна · Answer 1 · 2019-03-30 07:01:49+3:00

Var
   A:integer;
   P:real;
Begin
P:=1;
For A:= 100 to 620 do
    if A mod 23 = 0 then P:=P*A;
WriteLn('P = ',P);
End.

Итог работы программки:

P = 1.5255279798308E+55

Var
   A:integer;
   P:real;
Begin
P:=1;
For A:= 11 downto 6 do
    P:=P*A;
WriteLn('P = ',P);
End.

Итог работы программки:

P = 332640

О проекте

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

Добро пожаловать!