Сделайте программу в паскале abc! сли вводишь год рождения он выводит век

Program p1;
var
y:integer;
begin
write(Введите год, год = );
readln(y);
Writeln(Век = ,y div 100);
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку