составить программу на языке паскаль: S= 1-2+3-4+5-...(+,-)n. помогите пожалуйста)))
5-9 класс
|
var i,n,s:integer;
begin
write('n = ');
readln(n);
for i:=1 to n do
if i mod 2 = 0 then dec(s,i) else inc(s,i);
write('S = ',s)
end.
var n,i,rez:integer;
begin
write('Введите n: ');
readln(n);
rez:=0;
for i:=1 to n do
if odd(i) then rez:=rez+i
else rez:=rez-i;
writeln('rez=',rez);
end.
Другие вопросы из категории
Составить алгоритм нахождения площади и длины окружности если известен диаметр.
Методом который изобрёл Юлий Цезарь. Кто знает, помогите зашифровать!!! Ато никак в голову не лезет!!!!!!
Определить принадлежит ли точка A(x) лежащая на координатной прямой отрезку [-3,3].
послания?сведения,содержащиеся в книге,которую вы читаете повторно?
Читайте также
вычисления: а) y=x^10 б) y=x^15. Постараться использовать минимальное количество дополнительных переменных. 2) Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и описанной окружностей. Программу записать на языке Паскаль. 3) Дана величина А, выражающая объём информации в байтах. Перевести А в более крупные единицы измерения информации. Программу записать на языке Паскаль
19(16,3+7,7).а)19(16.3+7.7),в)19*(16.3+7.7).д)19(16,3+7.7).с)19*(16.3+7.7).2)Найдите правильную на языке паскаль записы выраженияа)34.5+24.5/15у в)(34.5+24.5)/15у с)(34.5+24.5)15*у.д)(34.5+24.5)/(15*у).3)Вычислите длину окружности и площадь круга одного и того же заданного радиуса R.4)Даны два числа.Найдите среднее арифметическое кубов этих чисел и среденее геометрическое модулей этих чисел.Два последних номера там нужно написать программу,программу присылать на листочке
на вечернее,от 8 до 9 на заочное,менее 8 балов отказано от приема на учебу.
Вывести на экран таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 20 с шагом 1 фунт (1 фунт=400г)
Пример оформления результата:
1 фунт=0,4 кг
2 фунт=0,8 кг
....
20 фунт=8 кг