Question

ПОЖАЛУЙСТА ПОМОГИТЕ С ИНФОРМАТИКОЙ!!!УПРАЖНЕНИЕ 3!!!НА ЯЗЫКЕ ПАСКАЛЬ!!!

Answer 1

Программы 3 и 4 и скриншоты их работы -  в приложениях

e309e8924d3bce318389e8488edf1b2d.pas

605f1e86e0a41552485365da3217022e.pas

Answer 2

Скриншоты не показывает дырявое приложение на телефоне. С компьютера все нормально. А безосновательные отметки верных решений, как нарушений, дают модераторам много лишней работы. Будете продолжать в таком же ключе - не удивляйтесь, потом, если Вас накажут.

Answer 3

Ни одно хорошее дело не остается безнаказанным! :)

Answer 4

Помечать неверным ответ, которого не понимаешь - это не "хорошее дело", а демонстрация собственной глупости в совокупности с некомпетентностью.

Answer 5

Это да :). Но я имел в виду что я сдела хорошее дело- по просьбе решил задачу, а мне за это влепили "неуд" :)

Answer 6

простите не знал

Answer 7

var
i:integer;
begin
For i:= -15 to 5 do
  Writeln('y = ', 23 * i + 1);
end.


Вывод
y = -344
y = -321
y = -298
y = -275
y = -252
y = -229
y = -206
y = -183
y = -160
y = -137
y = -114
y = -91
y = -68
y = -45
y = -22
y = 1
y = 24
y = 47
y = 70
y = 93
y = 116

e309e8924d3bce318389e8488edf1b2d.pas

605f1e86e0a41552485365da3217022e.pas