написати програмний код процедури для обчислення суми чисел, кратних 5, з

Написати програмний код процедури для обчислення суми чисел, кратних 5, з дапазону вд 15 до 48

Задать свой вопрос
1 ответ
//pascal
var sum,i:integer;
begin
for I:=15 to 48 do
begin
if (i mod 5 = 0) then sum:=sum+i;  
end;
writeln(sum);
end.

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


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

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

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

Войти на сайт