1. в двух пакетах есть рис. вес первого пакета =m кг, а второго= n кг.нужно определить общий вес пакетов и какой из них тяжелее. 2,найдите суммы положительных и отрицательных чисел из заданных n чисел.определите
наибольшее из сумм по абсолютной величине 3,нужно вывести на экран натуральные числа и их квадраты до указанного целого числа n. нужно решить эти , нарисовать к ним блок схемы и написать программы.
var m,n: integer;
begin
read(n,m);
if n > m then writeln(m+n, n);
else writeln(m+n, m);
end.
во второй непонятно как задются эти числа
var i,n: integer;
begin
read(n);
for i : = 1 to n do
writeln(i, i*i);
end.
блок схемы мы не учили да и фигня эти схемы чесно говоря
не знаю паскаль, знаю c++ : )
{
int a, b;
//вводим значения в a и в b (в футах)
cin > > a > > b;
b = b*45;
if (a> b) cout < < "в км больше";
else cout > > "в футах больше";
}
{
// тут важен дробный тип
dooble a, b;
//вводим значения в a и в b (м/c)
cin > > a > > b;
a = a: 3.6;
if (a> b) cout < < "в км/ч больше";
else cout > > "в м/с больше";
}
ну а дальше надо уже все по формулам смотреть.
{
doouble a,b;
//вводим значения в a и в b стороны
cin > > a > > b;
a=a*a*3.14;
b=b*b;
if(a> b) cout < < "площадь круга больше";
else cout < < "площадь квадрата больше";
}
4. не знаю как такое делать, что значит уместиться ли круг в квадрате? уместится если радиус его меньше чем половина стороны.
5.
{
doouble a,b,c,d;
cin > > a > > b > > c > > d; // вводим объем и массу;
a = a/b;
c = c/d;
if(a> c) cout < < "тело 1 имеет плотность больше чем тело 2";
else cout < < "тело 2 имеет большую плотность";
}
6. не знаю. но тоже как-то через форумулы.