Написать программу в паскале: даны три числа а,в,с.определить являются ли они последовательными членами арифметической прогрессии. найти их разность.

Nyrkoff Nyrkoff    1   02.06.2019 14:30    11

Ответы
Mariecharlaii Mariecharlaii  03.07.2020 09:59
Var a,b,c,d:real;
begin
readln(a,b,c);
if a-b=b-c then
begin
d:=b-a;
writeln(d);
end
else
writeln('No');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика