Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Сүреттi түзету переводится как коррекция изображения (редактирование изображения)
Объяснение:
Все что я знаю
var
n,i,a: integer;
begin
readln(n);
for i: =1 to n do
read(a);
write(abs(a),' ');
end;
end.
var a,b,c,d,x,res: integer;
readln(x);
a: =x div 1000;
b: =x mod 10;
c: =x div 100 mod 10;
d: =x mod 100 div 10;
res: =a+b+c+d;
writeln(res);
readln;
Популярные вопросы