Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1.
program xxx;
var i, n : integer
begin
writeln ('введите число n=');
readln (n);
writeln ('делители числа: ');
for i: = 1 to n do
if n mod i = 0 then writeln (i);
readln
end.
самое близкое число, к числу 25952, которое читается одинаково слева направо и справа налево это число: 26062.
26062 - 25952 = 110 секторов проверила программа за 2 секунды
110 : 2 = 55 секторов проверяет программа за секунду
32 - вопроса, 32 - ответа
var a,b,c,d,e: real;
read(a,b,c,d);
e: =(a+b+c+d)/4;
writeln(e: 0: 4);
Популярные вопросы