ПодпрограммаАлг подпр 1 ( арг цел X,Y, рез цел F)Нач X:=X+1

Подпрограмма
Алг подпр 1 ( арг цел X,Y, рез цел F)
Нач
X:=X+1
Y:=Y*5
F:= X+Y
кон
вызывается на выполнение

нач цел А,В,С
А:=3
B:=5
подпр 1 (А,В,А)
После этого значение переменной А будет одинаково

ПОМОГИИТЕ,С РЕШЕЕЕНИЕМ

Задать свой вопрос
Милена
подпр 1 (А,В,А)
Tatjana Zaburavkina
подпр 1 (А,В,C) ?
Анжелика Щенко
Задание всё верно записано.как досадно бы это не звучало больше никак по-иному(
Алла Севлюк
значит a = 29
Леонид Швырков
Ответ верный,но как решили?
Владислав Кафизов
поначалу a = 4, после значению b = 5*5 и после опять a = 4 + 5*5 = 4 + 25 = 29
Тамара Гуменикова
Благодарю !
Леня Бондарков
не за что
Чунщева Вера
function f1 (x,y,f:integer) :integer;beginx:=x+1;y:=y*5;f:=x+y;f1:=f;end;var a,b,c:integer;begina:=3;b:=5;writeln(f1(a,b,a));writeln(a);end.
Злата
это тоже самое только на паскале
1 ответ
Function podpr1(ByVal X,Y as Integer) as Integer
  X=X+1
  Y+Y*5
  podpr1=X+Y
End Function

sub test()
  A=3
  A=podpr1(A,5)
  MsgBox A
end sub

Результат 29
Значение переменной A будет 29
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт