Сделайте программу в паскале abc! сли вводишь год рождения он выводит век
Program p1;
var
y:integer;
begin
write(Введите год, год = );
readln(y);
Writeln(Век = ,y div 100);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Сделайте программу в паскале abc! сли вводишь год рождения он выводит век
Program p1;
var
y:integer;
begin
write(Введите год, год = );
readln(y);
Writeln(Век = ,y div 100);
end.