Есть ответ 👍

Найдите произведение натуральных чисел из промежутка от а до в,кратных 4. а и в вводятся с клавиатуры. как решить данную ?

260
310
Посмотреть ответы 2

Ответы на вопрос:


var a,b,pro: int64; begin  pro: =1;   readln(a, b);   repeat      if((a mod 4) =0) then pro: =pro*a;       inc(a);   until(a> b);   writeln(pro);   readln; end.

Emro
4,7(36 оценок)

Program nazvanie;

Uses Crt;

Var x: integer;

y: real;

Begin

write('Введите x ')';

read(x);

y:=1/x;

write('y = ', y);

end.

Объяснение:

Популярно: Информатика