1. вычислите количество часов и минут в n сутках. program 1; uses crt; var n,nh,nm,ns : integer; beginwrite (' введите количество суток: '); readln (n); nh: =n*24; {в сутках 24 часа} nm: =nh*60; (1 час=60 минут) writeln (n, суток =' , nh, 'часов=', nm, 'минут ='); end.
zaira1979zaira11
3
18.05.2019 20:45
0
Другие вопросы по теме Информатика
виктория1332
27.09.2019 14:40
Ксюхахаха
19.05.2020 19:46
dianaryabovaa
19.05.2020 19:46
korzhik559
31.05.2019 12:20
Намиг123
31.05.2019 12:20
skyline12345
31.05.2019 12:20
qwertyspro
07.07.2019 15:40
karrr123
30.07.2019 23:30
Популярные вопросы
- Сколько квадратных сантиметров в 8 дм2 25 см2?...
2 - Кто такой чичиков предприниматель или деловой подлец...
3 - Значение вегетативного размножения для растений: 1) 2)...
3 - Раставь понятия от более общего к менее общему кость скелет позвоночник...
1 - Нужно решить уравнения: а) 1/16 а в квадрате - 1/25=0; б) 4/49 b в квадрате -...
1 - Подумай и запиши, зачем тебе нужны знания об ....
1 - Какие из чисел -3, -2, 0, 1 являются корнями уравнения: 1)х²+х-6=0 2)х²-5х+4=0...
1 - Обясните происхождения названий 3 4 стран материка южной америки...
1 - Чем ящерицы отличаются от крокодилов?...
2 - Сколько литров углекслого газа при сгораний 48 г метана...
1
program 1;
uses crt;
var p,s,h,m,sc:integer;
begin
write('Количество суток = ');
read(p);
h:=p*24;
m:=h*60;
sc:=m*60;
writeln('Секунд = ' ,sc);
writeln('Минут = ' ,m);
write('Часов = ' ,h)
end.