Шавкат кызы

25.03.2022

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.

Информатика

Ответить

Ответы

Маргарита1091

25.03.2022

var

n, x, i, sum: integer;

begin

readln(n);

readln(x);

sum := 0;

for i:=1 to n do

begin

sum := sum + x;

x := x + 5;

end;

writeln(sum);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.

▲

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Найдите девятый элемент ряда: 1 , 2, 3, 6, 5, 10, 7, 14

Напечатать таблицу значений функции y=x^2 от -10 до 10 с шагом 1

Написатьпрограмму, котораябудетспрашиватьупользователя2 числа и выводить на экран их произведение.

Сделайте задание на скрине

Procedure f(n: integer); begin if n> 0 then begin f(n-1); f(n-3); writeln(n); end; writeln (n+3); end; что напечатает программа при f(2)? как решить подробно?

Вкажіть переваги векторної графіки

Вася написал программу (для удобства приводим ее код на трех языках программирования): python: x = int( a = x % 10 b = x // 10 % 10 c = x // 100 % 10 print(a + b + c) pascal: var x, a, b, c: intege...

Мазмұн құру кезеңдерін дәптерлеріңе толтлеріңе толтырыңдар.5-кезең4-кезең3-кезең2-кезең1-кезеңинформатика

Логическое выражение (желательно напишите на листике)

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.​

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Найдите девятый элемент ряда: 1 , 2, 3, 6, 5, 10, 7, 14

Напечатать таблицу значений функции y=x^2 от -10 до 10 с шагом 1

Написатьпрограмму, котораябудетспрашиватьупользователя2 числа и выводить на экран их произведение.

Сделайте задание на скрине

Procedure f(n: integer); begin if n&gt; 0 then begin f(n-1); f(n-3); writeln(n); end; writeln (n+3); end; что напечатает программа при f(2)? как решить подробно?

Вкажіть переваги векторної графіки

Вася написал программу (для удобства приводим ее код на трех языках программирования): python: x = int( a = x % 10 b = x // 10 % 10 c = x // 100 % 10 print(a + b + c) pascal: var x, a, b, c: intege...

Мазмұн құру кезеңдерін дәптерлеріңе толтлеріңе толтырыңдар.5-кезең4-кезең3-кезең2-кезең1-кезеңинформатика​

Логическое выражение (желательно напишите на листике)​

Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.

Procedure f(n: integer); begin if n> 0 then begin f(n-1); f(n-3); writeln(n); end; writeln (n+3); end; что напечатает программа при f(2)? как решить подробно?

Мазмұн құру кезеңдерін дәптерлеріңе толтлеріңе толтырыңдар.5-кезең4-кезең3-кезең2-кезең1-кезеңинформатика

Логическое выражение (желательно напишите на листике)