if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');
readln;
end.
Ответ дал: Гость
v=331+0.6t
в зимний день- v=331+0.6*(-35)=310 м/с
в летний день- v=331+0.6*30=349 м/с
Ответ дал: Гость
uses crt; var a[1..100] of integer; i,n,count: integer; begincount: =0; read(n); for i: =1 to n do read(a[i]); if a[i]> 0 then inc(count); write(count); end.
Другие вопросы по: Информатика
Похожие вопросы
Знаешь правильный ответ?
Количество битов-32 минимальное значение-0 максимальное значение-?...
Популярные вопросы