Помогите решить одну задачу легкую
Ответы:
05-12-2018 09:32
Program gt;var n,i,a,h:longint;beginreadln(n);h:=0;for i:=1 to n dobeginread(a);if(a>0) then h:=h+1;end;writeln(h);end.Этот сайт я знаю. я там решил 1250 задач
Также наши пользователи интересуются:
Напишите пожалуйста сочинение на тему: Собственность(моя, личная, можно, про вашу..Сочинение с числительными на тему спорт
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите решить одну задачу легкую» от пользователя Лина Маляренко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!