Срочно, прошу помочь. Работать нужно с ABC PASCAL. Мне нужна программа ( INTEGER,VAR,...

Question

Срочно, прошу помочь. Работать нужно с ABC PASCAL. Мне нужна программа ( INTEGER,VAR, REAL, PROGRAM) что бы все было, и закночить таблицу. Начать нужно со второго примера. Можете нарисовать и скинуть фотку, но пожалуйста сделайте

---

Answer 1

Program p1;
var x,y:integer;
begin
readln(x,y);
while x<16 do <br>begin
if (x>y) then
begin
x:=x-2;
y:=y+4;
end
else
begin
x:=x+5;
y:=y-3;
end;
writeln(x,' ',y);
end;
end.
----
Третью отправлю файлом как напишу.

Comments

Что убрать?

---

Не правильно

---

На бегин

---

Стоитъ

---

Блин. Тут нельзя ни файл отправить ни скриншот дать. Дай свой id Вк, я тебе скину нормальный код

---

Сейчас

---

Он не отправляет ссылки

---

не ссылку, просто айди

---

Я уже сам ссылку допишу

---

153396708