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

bauer2002 bauer2002    1   08.03.2019 05:30    67

Ответы
hkarkosan3 hkarkosan3  24.05.2020 05:01

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.

 

блок схемы мы не учили да и фигня эти схемы чесно говоря

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика