Помогите пожалуйста Информатика 9 класс. Напишите Задачу на языке Паскаль, и если можно графическими схемами
1.Даны объемы и массы двух тел изготовленных из разных материалов. Материал какого из тел имеет МЕНЬШУЮ плотность?
2.Даны 3 вещественных числа. Определить сумму тех чисел, которые больше 5.
Ответы
Ответ дал:
0
1) var
v1,v2,m1,m2:integer;
begin
readln(m1,v1,m2,v2);
if (m1/v1)>(m2/m2) then writeln('Первое')
else if (m1/v1)<(m2/m2) then writeln('Второе')
else writeln('Плотности равны')
end.
2) var
a,b,c,s:real;
begin
readln(a,b,c);
s:=0;
if a>5 then s:=s+a;
if b>5 then s:=s+b;
if c>5 then s:=s+c;
writeln(s)
end.
Ответ дал:
0
спасибо!
Вас заинтересует
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад