ответ: 1 жылда 12 ай 12*5=75
пошаговое объяснение:
program a;
var a,b: real;
n: integer;
begin
repeat
write('введите число от 0 до 24 два раза xx.xx');
readln(a, b);
n: =0;
if (1< =a) and (a< 13) then n: =n+1
else if (0< =a) and (a< =24) then n: =n+2;
if (1< =b) and (b< 3) then n: =n+1
else if (0< =b) and (b< =24) then n: =n+2;
if n< 2 then write ('12-hour clock')
else if n> 2 then write ('24-hour clock');
if n=2 then white ('both');
end.
ответ: 1 жылда 12 ай 12*5=75
пошаговое объяснение:
program a;
var a,b: real;
n: integer;
begin
repeat
write('введите число от 0 до 24 два раза xx.xx');
readln(a, b);
n: =0;
if (1< =a) and (a< 13) then n: =n+1
else if (0< =a) and (a< =24) then n: =n+2;
if (1< =b) and (b< 3) then n: =n+1
else if (0< =b) and (b< =24) then n: =n+2;
if n< 2 then write ('12-hour clock')
else if n> 2 then write ('24-hour clock');
if n=2 then white ('both');
end.