Составить программу вывода на экран суммы двойных четных чисел из спектра

Составить программку вывода на экран суммы двойных четных чисел из спектра от 3 до 34 (Pascal ABC)
СРОЧНО!!!!!!!!!!!!!!!!!!

Задать свой вопрос
1 ответ

var

k, s: integer;

begin

s:=0;

for k:=3 to 34 do

if k mod 2= 0 then

s:= s+2*k;

writeln(s);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт