Регистрация
ivanovavlada36
16.07.2020 12:36
Информатика
Есть ответ 👍

Напишіть програму обміну значеннями між змінними а і b.​

178
194
Посмотреть ответы 1

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

Feraaa2108
Feraaa2108
4,5(39 оценок)
Program i13; var     proisv,p,i: integer;     a: array[1..20] of integer; begin   readln(p);   proisv: =1;   for i: = 1 to p do         if a[i]> 0 then             proisv: =proisv*a[i]   writeln(proisv); end.

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