<span>Если нигде я не ошибся, то Петя записал числа от 1 до 1079 и начал писать следующее число 1080, написал 1 и бросил. Ответ 1</span>
1)var a,b,c,d,e,k : real;
begin
writeln('Введите ,b,c,d,e,k');
read(,b,c,d,e,k);
a:= (d + c + b)*e - 5k - 1
writeln(a);
end;
2)var c,x : real;
begin
writeln('Введите x');
read(x);
c:= abs(x+4) - abs(sqr(x)-3*x+6);
writeln(c);
<span>end.</span>
Var
n: integer;
begin
readln(n);
writeln(n mod 7 = 0);
end.
1. ышмь
2. лакитаврау
3. онимрот
4. икоонкл
5. нитрепр