дано а(а 1440)–кількість секунд, які минули від початку доби.що відображено на табло електроного гидинника,якщо - id2063355320210214 от Вера77777 14.02.2021 09:31

Question

Информатика: дано а(а 1440)–кількість секунд, які минули від початку доби.що відображено на табло електроного гидинника,якщо покази подаються у форматі голини:хвилини:секунди

Вера77777 · Accepted Answer

1) var a1, a2, a3, s: integer;
begin
write('Введите первое число: ');
readln(a1);
write('Введите второе число: ');
readln(a2);
write('Введите третье число: ');
readln(a3);
if a1>0 then s:=s+1;
if a2>0 then s:=s+1;
if a3>0 then s:=s+1;
writeln(s);
end.

2) var n, s, i: integer;
begin
write('Введите число n: ');
readln(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.

3) var n, s, i, k: integer;
begin
write('Введите число n: ');readln(n);
for i:=1 to n do begin
writeln('Введите рост ',i,' учащегося: ');
readln(k);
s:=s+k;
end;
writeln(s/i);
end.

4)var l, m: integer;
begin
write('Введите расстояние в сантиметрах: ');
readln(l);
m := l div 100;
write('Количество метров в ', l, ' сантиметрах = ', m);
end.

дано а(а<1440)–кількість секунд, які минули від початку доби.що відображено на табло електроного гидинника,якщо покази подаються у форматі голини:хвилини:секунди

MOGZ ответил