• СРОООЧНО!!!!!!!!!!!!!!!!
    (паскаль)
    написать программы

    question img

Ответы 1

  • z10)var A, B, C: integer;begin  write('Введите A, B, C: '); readln(A, B, C);  writeln('Сумма = ', A + B + C);  writeln('Произведение = ', A * B * C);end.  z11)var a,s,v:integer;begin  writeln('Введите длинну куба: ');  readln(a);  s:=6*a*a;  v:=a*a*a;  writeln('Объем = ', v);  writeln('Площадь боковой поверхности = ', s);end. z13)var A, B, C: integer;begin  A := 20; B := 13;  C := A;  A := B;  B := C;  writeln('A = ', A);  writeln('B = ', B);end.  z14)var A, B: integer;begin  A := 20; B := 13;  A:=A+B;  B:=A-B;  A:=A-B;  writeln('A = ', A);  writeln('B = ', B);end. 
    • Автор:

      diegomzc9
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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