Регистрация
Войти
Стать экспертом Правила
Информатика

Как перенести в паскаль данное условие? (как будет выглядеть финальный код?)c:=30;for i:=1 to 4 do beginc:=c-5end;

ОТВЕТЫ

c = 10

program s;

var c,i:integer;

begin

c:=30;

for i:=1 to 4 do begin

c:=c-5

end;

write(c);

end.

106
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам