Помогите отредактировать программу!!!
Найдите сумму первых 12 членов ариф.прогрессии, заданной формулой а=7-3*n.
vasilisakuimova:
Вот сама программа.
Program c1;
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.
begin
write('n=');readln(n);
a:=7-3*1;
z:=7-3*n;
s:((a+z)*n)/2;
writeln('s=',s);
end.
выходит большое странное число
Ответы на вопрос
Ответил 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.
У Вас ошибка в присвоении переменной 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.
Новые вопросы
Геометрия,
1 год назад
Психология,
1 год назад
Русский язык,
2 года назад
Математика,
2 года назад
Физика,
7 лет назад