var a,c,f: integer; begin readln(a); for a:=5 begin readln(c); if (a mod 25=10)then f:= a+c; end. writeln(s) end. в чем ошибка

293

374

Посмотреть ответы 2

Ответы на вопрос:

NoNameKek1Himka

Информатика

4,8(82 оценок)

Неправильно написан цикл

Объяснение:

синтаксис объявления таков

for i := 1 to n do

// код вашей программы

от 1 до n делаем такой-то код

В вашем случае for a:=5 begin не указан сколько раз выполнить цикл

если пять раз то for a:=1 to 5 do begin

// код

end;

YULEMESLEILAA

Информатика

4,8(80 оценок)

Минимальная длинна изгороди будет при равных длинне и ширине, т.е. участок должен быть квадратным допустим длинна х, тогда ширина s/х общая длинна изгороди 2*(х+s/x) исследуя данный график для действительных х и s получаем его минимум в точке х^2=s