Предмет: Информатика,
автор: ezapotylok
аааа пожалуйста решите по информатике ато убьёт училка 8 КЛАСС
Если целое число m делится на целое число n то вывести частное от токого деления в противном случае вывести сообщение в "НЕ ДЕЛЯТСЯ"
Ответы
Автор ответа:
0
Program Primer;
var
m:real;
n:real;
begin
writeln('Введите данные:');
writeln('Число "m":');
readln(m);
writeln('Число "n":');
readln(n);
If (m mod n=0) then writeln('Частное=', m/n);
If (m mod n<>0) then writeln('НЕ ДЕЛИТЬСЯ');
End.
var
m:real;
n:real;
begin
writeln('Введите данные:');
writeln('Число "m":');
readln(m);
writeln('Число "n":');
readln(n);
If (m mod n=0) then writeln('Частное=', m/n);
If (m mod n<>0) then writeln('НЕ ДЕЛИТЬСЯ');
End.
Автор ответа:
0
ааа ну спасибо)))
Похожие вопросы
Предмет: Литература,
автор: sertenov2004
Предмет: Алгебра,
автор: Аноним
Предмет: Математика,
автор: ninuci12
Предмет: География,
автор: Леська111