Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
s : string;
a : integer;
begin
writeln('введите строку символов: '
readln (s);
a: = length(s);
if a mod 2= 0 then writeln ('четное') else writeln('не четное');
readln;
end.
v=331+ 0,6*t
в зимний день- v=331+ 0.6*(-35)=310 м/с
в летний день- v=331+ 0.6*30=349 м/с
Популярные вопросы