Предмет: Информатика,
автор: хрустально
Помогите пожалуйста с задание по информатике на написание программы в Паскаль:
Найти сумму ряда
1-2+3-4+5-...+56
petyaGavrikov:
Сумму можно вычислить и без программы: (-1)*(56/2) = -28
Ответы
Автор ответа:
1
var i,s:integer;
begin
s:=0;
for i:=1 to 56 do
if i mod 2=1 then s:=s+i else s:=s-i;
writeln('s = ',s);
end.
Результат:
s = -28
begin
s:=0;
for i:=1 to 56 do
if i mod 2=1 then s:=s+i else s:=s-i;
writeln('s = ',s);
end.
Результат:
s = -28
Можешь пожалуйста через while
var i,s:integer;
begin
s:=0; i:=0;
while i<56 do
begin
i:=i+1;
if i mod 2=1 then s:=s+i else s:=s-i;
end;
writeln('s = ',s);
end.
begin
s:=0; i:=0;
while i<56 do
begin
i:=i+1;
if i mod 2=1 then s:=s+i else s:=s-i;
end;
writeln('s = ',s);
end.
Огромное спасибо тебе!!!!!!❤️❤️❤️
Похожие вопросы
Предмет: Английский язык,
автор: ss7262915
Предмет: Физика,
автор: tihtimi
Предмет: Музыка,
автор: Nic0v3l
Предмет: Математика,
автор: Аноним