Язык C++.
#include <iostream>
using namespace std;
int main() {
int t, s, n;
cin >> t;
s = t * 9;
if (s > 8)
n = 80 - s;
else
n = 0;
cout << n << endl;
}
//PascalABC.Net 3.2
procedure swap (var a1, a2: integer);
begin
var promt:=a1;
a1:=a2;
a2:=promt;
end;
begin
var a:=ReadArrInteger ('Вводите массив: ', readinteger ('Размерность : '));
var i:=-1;
while (i+2)<length (a) do
begin
i+=2;
swap (a[i], a[i-1]);
end;
a.Print;
end.
Все расписано на фото, про знаки препинания не забывай
Var a, b, c: integer;
begin
readln (a, b, c);
writeln('Сумма: ' , a+b+c);
write('Произведение: ', a*b*c);
end.