Відповідь:
2)
var t:integer;
begin
write('Задайте массу в киллограммах:');
read(t);
write('Полных центнеров: ',t div 100,' полных тонн: ',t div 1000);
end.
3)
write('Количество секунд: ');
write('Показания часов ',t div 3600 mod 24,':',t div 60 mod 60,':',t mod 60);
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Відповідь:
2)
var t:integer;
begin
write('Задайте массу в киллограммах:');
read(t);
write('Полных центнеров: ',t div 100,' полных тонн: ',t div 1000);
end.
3)
var t:integer;
begin
write('Количество секунд: ');
read(t);
write('Показания часов ',t div 3600 mod 24,':',t div 60 mod 60,':',t mod 60);
end.