Есть ответ 👍

Какой композитор написал оперу посвящая А.Огонбаева​

117
416
Посмотреть ответы 1

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

Sherlokzn
4,5(42 оценок)

ответ:

program test1;

var

a,b,c,k: integer;

begin

k: =0;

writeln('введите числa a,b и c: ');

readln(a,b,c);

if a > 0 then

k: =k + 1;

if b > 0 then

k: =k + 1;

if c > 0 then

k: =k + 1;

writeln('количество положительных чисел в исходном наборе: ',k);

end.

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