Помогите пожалуйста Информатика 9 класс. Напишите Задачу на языке Паскаль, и
Помогите пожалуйста Информатика 9 класс. Напишите Задачку на языке Паскаль, и если можно графическими схемами
1.Даны объемы и массы 2-ух тел сделанных из различных материалов. Материал какого из тел имеет Наименьшую плотность?
2.Даны 3 вещественных числа. Определить сумму тех чисел, которые больше 5.
1) var
v1,v2,m1,m2:integer;
begin
readln(m1,v1,m2,v2);
if (m1/v1)gt;(m2/m2) then writeln('1-ое')
else if (m1/v1)lt;(m2/m2) then writeln('2-ое')
else writeln('Плотности одинаковы')
end.
2) var
a,b,c,s:real;
begin
readln(a,b,c);
s:=0;
if agt;5 then s:=s+a;
if bgt;5 then s:=s+b;
if cgt;5 then s:=s+c;
writeln(s)
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.
Русский язык.
Разные вопросы.