Помогите, пожалуйста, подсчитайте в переменной s сумму 14 первых чисел в последовательности 20; 26; 32; 38; 44 и так далее
Ответ:
Смотри картинку
Объяснение:
program primer1;
var x,y,s:integer;
begin
y:=1;
x:=20;
s:=0;
while y<15 do</p>
s:=s+x;
x:=x+6;
y:=y+1
end;
writeln(s)
end.
y<15 можно заменить на y<=14</p>
; перед end можно не ставить
у меня выходит ошибка компиляции
В чем запускаете?
Сами набирали или копировали?
Запускаю в Паскале, сама набирала
В каком Паскале (укажите точно название программы)? Если сможете разместите скриншот на https://prnt.sc/ и укажите ссылку.
PaskalABC
У меня стоит PascalABC.NET в нём точно работает. Разместите, пожалуйста, скриншот, чтобы я увидел как выглядит программа у вас или напишите на какую строку ссылается при ошибке.
Вы молодец, это просто я неправильно набрала, спасибо большое Вам за грамотный ответ, вышло в командной строке 826
Пожалуйста, рад что у вас всё получилось. ) Ответы у нас совпадают.