Предмет: Информатика, автор: nemchenko203395

Помогите пожалуйста
PascalABC
Ввести число, обозначающее количество секунд. Вывести то же самое время в минутах и секундах.
Пример:
Введите число секунд: 175
Ответ: 2 мин. 55 с.


nemchenko203395: Program program1;
var a,b,c:integer;
begin
writeln('Введите кол-во секунд: ');
read(a);
b:=a div 60;
c:=b div 3600;
write (a, ' Секунд, это ', b, ' часов', c, ' секунд.')
end.
nemchenko203395: у меня получился такой код,но я не знаю как вывести секунды

Ответы

Автор ответа: flickyoff
22

Ответ:

Program z1;

var a,b,c:integer;

begin

writeln('Введите кол-во секунд: ');

read(a);

b:=a div 60;

c:=a mod 60;

write (a, ' секунд -  это ', b, ' минут(ы) ', c, ' секунд(ы).')

end.

Объяснение:

Похожие вопросы
Предмет: Русский язык, автор: Julie13
Предмет: Математика, автор: кямран2288