logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
ДинислаМММ

Дано натуральное число n и действительное a. вычислите a+2a+3a++na напишите программу while, repeat until

Показать ответ
Ответ:
незнайка1162
незнайка1162
03.10.2020 12:18
Program n1;
var a,s:real;
n,i:integer;
begin
readln(a);
readln(n);
s:=0;
for i:=1 to n do
s:=s+a*i;
writeln(s);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Валерик2281
Валерик2281
01.05.2021 13:39
Что произойдет при запуске программы? у нас ф.о​...
frazka228
frazka228
09.10.2020 14:52
Сколько раз выполнится цикл: i:=6; while i 6 do i:=i+3;...
полинаполига
полинаполига
01.06.2021 20:55
В равнобедренном треугольнике боковая сторона равна 8 см, основание 6 см. Найдите периметр треугольника. а) 20см; б) 24см; в) 22см. Основные элементы треугольника...
Julianna2006
Julianna2006
26.07.2020 07:10
Что не так с программой? program pyt; var V1,V2,S1,S2,s:real; begin read(V1); read(V2); S1:=V1*3; S2:=V2*3; s:=S1-S2; write( s= ,s:2:0); end....
megapunzaru200
megapunzaru200
20.01.2020 15:23
:№1 заполните таблицу, в каждой строке которой одно и то же число должно быть записано в различных системах счисления (запишите решение в тетрадь/листок). двоичная...
IlyaLS
IlyaLS
18.10.2021 04:22
Напишите программу, которая находит сумму и произведение трёх целых чисел, введённых с клавиатуры. Например, при вводе чисел 4, 5 и 7 мы должны получить: 4+5+7=16...
danilpus2016
danilpus2016
28.03.2020 10:25
Напишите программу, которая в последовательности целых чисел определяет количество отрицательных чисел и сумму положительных. Программа получает на вход целые числа,...
anisimovaanech
anisimovaanech
15.08.2022 12:17
Определите значения истинности высказываний A, B, C, D, E, F, G, H, I, J, K, если высказывания а) – д) — истинные, а высказывания е) – л) — ложные: а) A ∧ (2 ⋅ 2...
lolshowsasdasfd
lolshowsasdasfd
30.11.2021 05:06
Вычислить значения Z1 и Z2 по формулам: z1=дробь |x|-|y|/1+|x-y|; z2=дробь sin(x)+cos(y)/1+(x+y) c++...
elvin123451
elvin123451
26.04.2021 01:55
Какую эпоху историки называют Новым временем?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота