Інформатика 8 клас (pascal abc) 6. Створіть проект для обчислення суми n чисел, перше з яких дорівнює x, а кожне наступне на 5 більше від попереднього.
Natasharuslan11
2
03.11.2020 16:55
7
Другие вопросы по теме Информатика
polly133
17.12.2020 10:40
evakazakova20
17.12.2020 10:40
yulis1929
17.12.2020 10:40
Dedula5
17.12.2020 10:40
andriyana13
28.10.2020 09:40
fedos1488
14.01.2021 12:52
PROматематик
14.01.2021 12:52
Mezhanova16
14.01.2021 12:54
фируза14
14.01.2021 12:54
Популярные вопросы
- Назвіть природоохоронні об єкти що є у запорізькій област...
2 - А)Заполнить двумерный массив 10x10 целыми случайными числами в интервале...
3 - Найдите интересные факты из жизни правителя Англии в конце XIl в...
3 - Докажите, что площадь боковой поверхности прямой призмы (т. е. сумма...
1 - 1. Какое утверждение является неверным.1) Союзы служат для выражения...
3 - Решите вторую и четвертую....
2 - Когда отцу было 35 лет, его сыну было 5. Два года назад возвраст...
3 - Рассчитай количество нуклонов, протонов и нейтронов в изотопе химического...
2 - К чему привёл Колькин обман? Почему старуха Клюквина изменила своё...
1 - ВЕЩЕСТВА СложныеМеталлы Неметаллы | Оксиды Основания. Кислоты ...
1
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.