Program ex;
var k,h,m: integer;
begin
write('Введите k: ');
readln(k);
h:=k div 3600;
m:=(k - h)div 60;
write('It is ',h,' hours ',m,' minutes');
end.
Старый друг лучше новых двух.
Var y, x: integer;
begin
readln(y);
x:=y-2;
writeln(y, '= ', x, '+2');
end.
Так как-то
Ну если раньше сохранением информации считались летописи, ну или просто книги, то сейчас, чтобы сохранить информацию достаточно иметь ПК, другие гаджеты или обычную флешку :)
Животный мир земного шара велик и разнообразен. Животные населяют всю природу вокруг нас. Животные —живые существа. Слово «существо» произошло от слова «существует», то есть живёт. Вот и получается, что любое животное живёт и, так же как человек, дышит, передвига–ется, питается, заботится о своём потомстве и строит для себя жилище — «дом».