Предмет: Информатика, автор: vasilisakuimova

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


vasilisakuimova: Вот сама программа.
vasilisakuimova: Program c1;
vasilisakuimova: 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.
vasilisakuimova: выходит большое странное число

Ответы

Автор ответа: SanGreen74
1
Ответ: -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.
Похожие вопросы
Предмет: Алгебра, автор: Zahar1827373