Помогите пожалуйста срочно программа Pascal ABC программа спрашивает стороны прямоугольника (А,В)находят площадь А*В и выводит результат на экран. далее программа спрашивает любое число если оно деляться на 5 , но выводит сообщение (число кратко 5 ) иначе выводит число (не кратко 5 ) почему не правельно срочно
Uses crt;var a,i:byte; s:real; begin clrscr; for i:=1 to 4 do begin writeln('vvod'); readln(a); if a mod 5=0 then writeln('Число ',a,' кратно 5 ') else writeln('Число ',a,' не кратно 5') end; end.
и все
остальное правельно
ау
Ещё раз говорю, чтобы найти все ошибки алгоритма мне нужен код в текстовом виде.
сейчас
не уходите
Циклу for значение присваивается не так. Пример: For i:=1 to n do
вы можете найти меня вк
и я вам скину
или в ВАТСАПЕ