1. подсчитать произведение n введенных чисел. (цикл с предусловием) 2. вычеслите разность между суммой четных и суммой нечетных чисел из числового промежутка от 1 до 50.(цикл for) 3. вывести на экран n звездочек. (цикл с постусловием) заранее !

Діана25123456789000 Діана25123456789000    1   25.08.2019 01:00    1

Ответы
FaizTimYr FaizTimYr  05.10.2020 17:43
Var p,i: integer;
begin
p:=1;
read(n);
x:=1;
while x<=n do
p:=p*i;
writeln(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика