Ответы
Ответ дал:
0
Var v:integer;
Begin
Readln (v);
If v>90 then Writeln ('Штраф') else Writeln ('Молодец');
end.
Begin
Readln (v);
If v>90 then Writeln ('Штраф') else Writeln ('Молодец');
end.
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад