Как написать в pascal abc программу которая Определяет является ли последовательность...

Question

Как написать в pascal abc программу которая Определяет является ли последовательность арифметической прогрессией

Answer 1

Var a,b,c: integer; Begin Writeln ('vvedite perviy chlen posledovatelnosty'); Readln (a); Writeln (' vvedite vtoroy. Chlen posl'); Readln (b); Writeln (' vvedite tretiy chlen posledovatelnosty '); Readln(c); While a:=(c-b)

Comments

Do

---

Write('арифмитическая последовательность введена верно');

---

Else Writeln ('ошибка'); end.

---

После последних двух врайтов точку с запятой убери