Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Помогите отредактировать программу!!!
Найдите сумму первых 12 членов ариф.прогрессии, заданной формулой а=7-3*n.

Ответ оставил Гость

Ответ: -150
У Вас ошибка в присвоении переменной s (отсутствует знак =)

var i,a,n,z,s:real; 
begin 
write(n=);readln(n); 
a:=7-3*1; 
z:=7-3*n; 
s:=((a+z)*n)/2; 
writeln(s=,s); 
end.