1)даны объёмы и массы двух тел из разных материалов.материал какого из тел имеет большую плотность?

2)определить является ли число А делителем числа В. и наоборот?

составить программы на паскале

1

Ответы и объяснения

Лучший Ответ!
2012-04-11T19:30:13+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

var m1,m2,v1,v2:real;

Begin

  read(m1,m2,v1,v2);

  if m1/v1 > m2/v2 then writeln('Pervoe')

  else writeln('Vtoroje');

End.

 

var a,b:integer;

Begin

  read(a,b);

  writeln('A delitel B - ', A mod b=0);

  writeln('B delitel A - ', B mod A=0);

 

End.