Регистрация
kristin20
28.08.2020 19:54
Информатика
Есть ответ 👍

Який загальний вигляд команди циклу з лічильником​

193
291
Посмотреть ответы 1

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

esedova61p0apim
esedova61p0apim
4,7(3 оценок)
Var   a,b,c,d,k: integer; begin   write('введите a,b,c,d: ');   readln(a,b,c,d);   k: =0;   if a> 0 then k: =k+1;   if b> 0 then k: =k+1;   if c> 0 then k: =k+1;   if d> 0 then k: =k+1;   writeln(a,' ',b,' ',c,' ',d,' k=',k); end. тестовое решение: введите a,b,c,d: -4 5 3 0 -4 5 3 0 k=2

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