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

Question

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

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

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)