Правильный ответ 3. (16;-17)
(2+6(-1-2));(-7+6(1+1+2)). Мы окажемся в точке (-16;17). А что бы вернуться в исходную нужно привать 16 по оси х и вычесть 17 по оси у.
Готово. Запрос на ввод, условие и вывод.
Program z1;
var n:integer;
i:integer;
r:integer;
begin
writeln('Введите количество желающих');
readln(n);
i:=0;
r:=0;
while(n>0) do
begin
writeln('Введите рост ученика : ');
readln(r);
if(r>170) then i:=i+1;
n:=n-1;
end;
writeln(i);
end.
В паскале попробывал все получилось)
var
a,b,c,e:integer;
begin
read(a);
c:=0;
for e:=1 to a
do
begin
read(b);
if b mod 10=3
then
c:=c+1;
end;
write(c);
end.