1. Информатика
  2. Ввести число обозначающее

Ввести число обозначающее количество секунд. вывести то же самое время в часах, минутах, секундах. пример: число секунд: 8325 2 ч. 18 мин. 45 с

d7175944p0ajvy d7175944p0ajvy    3   23.09.2019 02:20    63

Ответы
mony3 mony3  08.10.2020 11:12
Program program1;
var a,b:integer;
begin
writeln('Введите кол-во секунд: ');
read(a);
b:=a div 3600;
write (a, ' Секунд, это ', b, ' часов.')
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
киса5558 киса5558  06.10.2019 12:20
Для какого из указанных значений числа x ложно высказывание: не(x 2) или ((x 4) и (x 1) 1 2) 2 3) 3 4) 4...
perrezz perrezz  06.10.2019 12:30
Дана модель. выбери верный ответ. 1830−е годы. завоевание кавказа, знавшее куда более «бурные дни», близится к завершению. «чуждые силы», конечно, тяготят «край вольности святой»,...
АнелияУразбаева АнелияУразбаева  30.04.2020 09:58
Как достать Тимми из колодца в Бэтмен Лего 3 чтобы получить Ищейку Эйса...
228alex777 228alex777  30.04.2020 09:58
Алфавит состоит из 128 символов. Какой объем информации несет одна буква этого алфавита? ​...
lolkek3023 lolkek3023  30.04.2020 09:57
Подготовка реферата история развития компьютерной техники...
Битон64 Битон64  15.03.2020 21:26
Надо в программе специальной , сделать машину с черепашки. И прислать её файлом. Вот такую⬇️...
timon040805 timon040805  15.03.2020 21:24
A. Покупка Ограничение времени 1 секунда Ограничение памяти 64Mb Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt У Андрея имеется некоторая сумма денег....
vlad20077 vlad20077  15.03.2020 21:20
Задать массив случайным образом из 8 строк и 8 столбцов. Элементы выбираются от -10 до 10. Найти максимум и минимум элементов. Решить в ПаскальАВС...
Svetka707 Svetka707  15.03.2020 21:20
Напишите программу, которая выводит следующий рисунок с оператора цикла с параметром: ***...
Kirill12345qwert Kirill12345qwert  12.03.2021 07:17
Var n: byte; beginwrite (1 - den 7-gedeyingisandiengiz);read(n); -case n of1: Writeln( Duysenbi );2: Writeln( Seysenbi );3: Writeln( Saisenbi );4: Writeln( Beysen bi );5: Writeln(...

Популярные вопросы