Паскаль! вычислить произведение натуральных чисел, начиная от 12 до 18
Var s,a:integer; begin s:=1; for a:=12 to 18 do s:= s * a; writeln (s); end . писал с телефона
где ты взял а? :)
ваша задача не имеет смысла т.к. вы всё время умножаете на 0
точнее не а, а s.. перепутал
Это ошибка была как только я ее скинул, после
этого я сразу ее исправил, попробуйте обновить
ок, точку с запятой не забудьте
Ага:)