найти сумму первых семи чисел кратных 3 в pascal abc

я ошибку нашёл - a:=7; b:=3*a;

попробуй так:измени кодfor d:=1 to b dobeginif d mod 3 = 0 then c:=c+d;end;на этотfor d:=1 to b dos:=s+3*i;

сейчас скачаю freepascal,перепроверю,если еще актуально,а то пишу по памятихотя,вашим преподам я бы головы отрывал,язык умер лет 20 назад ужея всех по Си++ учу давно

изменял, не идёт