• Известна масса каждого из 12 предметов.Определить общую массу всего набора предметов.
    На Паскале

Ответы 1

  • var A:array[1..12] of integer;i:integer;s, b:real;beginfor i:=1 to 12 dobeginwriteln ('Введите массу ',i,' предмета');readln(b);s:=s+b;end;writeln('Масса всех предметов равна ',s:8:4,' кг');end. 
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years