помогите пожалуйста срочно программа Pascal ABC
программа спрашивает стороны прямоугольника (А,В)находят площадь А*В и выводит результат на экран. далее программа спрашивает любое число если оно деляться на 5 , но выводит сообщение (число кратко 5 ) иначе выводит число (не кратко 5 )
почему не правельно
срочно

не уходите

Циклу for значение присваивается не так. Пример: For i:=1 to n do

вы можете найти меня вк

и я вам скину

или в ВАТСАПЕ

uses crt;var a,i:byte;    s:real;beginclrscr;for i:=1 to 4 dobeginwriteln('vvod');readln(a);if a mod 5=0 then writeln('Число ',a,' кратно 5 ') else writeln('Число ',a,' не кратно 5')end;end.