написать функцию которая складывает два всех числа (два параметра)Безотлагательно на паскале

Написать процедуру которая складывает два всех числа (два параметра)
Безотлагательно на паскале

Задать свой вопрос
2 ответа
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программка не работает, обновите версию!

procedure Sum2(a,b:real; var r:real);
begin
  r:=a+b
end;

begin
  var a,b,c:real;
  (a,b):=ReadReal2('Введите два числа');
  Sum2(a,b,c);
  Writeln('Их сумма одинакова ',c)
end.

Пример
Введите два числа -3.184 153
Их сумма одинакова 149.816
Var
a, b, c: integer;
procedure sum(x, y: integer; var z: integer);
begin
z := x + y;
end;
begin
writeln('Введите два числа: ');
readln(a, b);
sum(a, b, c);
writeln(c);
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт