1. В двух пакетах есть рис. Вес первого пакета =m кг, а второго= n кг.Нужно определить общий вес пакетов и какой из них тяжелее. 2,Найдите суммы положительных и отрицательных чисел из заданных n чисел.Определите наибольшее из с...

Question

1. В двух пакетах есть рис. Вес первого пакета =m кг, а второго= n кг.Нужно определить общий вес пакетов и какой из них тяжелее. 2,Найдите суммы положительных и отрицательных чисел из заданных n чисел.Определите наибольшее из с...

1. В двух пакетах есть рис. Вес первого пакета =m кг, а второго= n кг.Нужно определить общий вес пакетов и какой из них тяжелее. 2,Найдите суммы положительных и отрицательных чисел из заданных n чисел.Определите наибольшее из сумм по абсолютной величине 3,Нужно вывести на экран натуральные числа и их квадраты до указанного целого числа n. НУЖНО решить эти задачи, нарисовать к ним блок схемы и написать программы. ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!!

Гость

Ответ(ы) на вопрос:

Accepted Answer

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. блок схемы мы не учили да и фигня эти схемы чесно говоря