Напишите программу на pascal abc,которая читает массу 12 грузов,что загружаются в машину,и выдает общую массу груза в машине после загрузки.

alinademushkina1 alinademushkina1    2   19.07.2019 23:40    4

Ответы
yanbalan19 yanbalan19  07.08.2020 10:17
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
  Writeln(ReadArrInteger(12).Sum)
end.

Тестовое решение:
50 38 12 73 27 14 53 48 31 27 14 18
405
ПОКАЗАТЬ ОТВЕТЫ
Vlab36534 Vlab36534  07.08.2020 10:17
Uses crt;var a,b,c,d,g,i,k,l,z,x,m,n,q:real;beginwriteln('введите число тон');readln(a);writeln('введите число ');readln(b);writeln('введите число ');readln(c);writeln('введите число ');readln(d);writeln('введите число ');readln(g);writeln('введите число ');readln(i);writeln('введите число ');readln(k);writeln('введите число ');readln(l);writeln('введите число ');readln(n);writeln('введите число ');readln(m);writeln('введите число ');readln(z);writeln('введите число ');readln(x);q:=a+b+c+d+g+i+k+l+z+x+m+n;writeln('Обща маса',q:10:2);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика