Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ответ:Windows Media Player
Объяснение:
program naoborot;
uses crt;
var n,a,b: integer;
begin
clrscr;
write('введите натуральное число: ');
readln(x);
n: =x;
while n> =1 do
a: =n mod 10;
n: =n div 10;
b: =b*10+a;
end;
write('прочтение цифр числа справа налево: ',b)
end.
нам это тоже задовали под буквой а я тож не знаю,а вот под буквой б напишу
program prim;
var i,sum,n,x : integer;
write('n = ');
readln(n);
x: =2;
sum: =2;
i: =1;
while sum< =n do
x: =x+2;
i: =i+1;
sum: =sum+x;
writeln(i,'слагаемых');
Популярные вопросы