Запиши программу на языке Паскаль.

var
i,n:word;
begin
write('n=');
readln(n);
for i:=1 to n do begin write(i,' ');
end;
readln;
end.

На экране

n=2

Question

Информатика: Запиши программу на языке Паскаль. var i,n:word; begin write( n= ); readln(n); for i:=1 to n do begin write(i, ); end; readln; end. На экране n=2

darya1122334455667 · Accepted Answer

В минуте 60 секунд.
1) Разделить число на 3600.Получим .целое число означает текущий час.
Если  из задонного числа вычесть получившееся целое число умноженное на 3600 получим число секунд в текущих минутах.
2)это число необходимо разделить на 60. Целое число будет означать текущую минуту.
3) вычитаем из оставшегося числа число минут умноженное на 60 получим текущую секунду.

Например
Задано число 66276.

часов.
    18 * 3600 = 64800
    66276 - 64800 = 1476
минуты.
     24 * 60 = 1440
     1476 -1440 = 36

ответ: 18 часов , 24 минуты, 36 секунд.

Запиши программу на языке Паскаль. var i,n:word; begin write('n='); readln(n); for i:=1 to n do begin write(i,' '); end; readln; end. На экране n=2

MOGZ ответил

Запиши программу на языке Паскаль.

var
i,n:word;
begin
write('n=');
readln(n);
for i:=1 to n do begin write(i,' ');
end;
readln;
end.

На экране

n=2