Есть ответ 👍

Определить произведение чётных чисел в диапазоне от 1 до 10 в программе pasqal abc

243
254
Посмотреть ответы 2

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


Var i,p: integer; begin   i: =2;   p: =1;   repeat       p: =p*i;       i: =i+2;   until i> 10;   writeln('произведение: ',p); end. произведение: 3840
n00byte
4,4(24 оценок)

Ядумаю ~100

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