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

Ответы на вопрос
Ответил ProgrammerV1
0
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.
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.
Ответил tatiana171
0
не уходите
Ответил ProgrammerV1
0
Циклу for значение присваивается не так. Пример: For i:=1 to n do
Ответил tatiana171
0
вы можете найти меня вк
Ответил tatiana171
0
и я вам скину
Ответил tatiana171
0
или в ВАТСАПЕ
Новые вопросы
Другие предметы,
2 года назад
Математика,
2 года назад
Математика,
8 лет назад
Литература,
8 лет назад
Обществознание,
9 лет назад
Литература,
9 лет назад