Справочник вопросов и ответов
QUOR - электронный справочник

посчитайте с информатикой. ответ ​

Тег: Информатика

program sutki;

var a,b,c: integer;

begin

write('задайте число часов');

readln(a);

b:=a mod 24;

c:=a div 24;

write(c,'суток и ',b,'часов');

end.

272