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

Напишите программу , которая в последовательности естественных чисел определяет сумму чисел ,кратных 4 и заканчивающихся на 6. Программа получает на вход количество чисел в последовательности ,а потом сами числа. Программа обязана вывести одно число: сумму чисел ,кратных 4 и заканчивающихся на 6.
Очень нужна программка!

Задать свой вопрос
1 ответ
Var n,summa,i:integer;begin  Write('vvedity chislo'); Readln(N);  for i:=1 to N do Summa:=summa+n;  for i:=1 to N do begin  if i mod 4 = 0 then Write(i, ' ');  end;  Writeln;  for i:=1 to n do begin  if i mod 10 = 6 then Write(i, ' ');  end;end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт