Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program pr; label l; var mas: array[1..10] of integer; i,k,n,b,sum: integer; beginrandomize; for i: =1 to 10 do mas[i]: =round(())*random+(-10)); l: for i: =1 to 10 dobeginif n< mas[i] thenbeginn: =mas[i]; k: =i; end; end; writeln ('a[',k,']=',n); mas[k]: =-11; n: =0; k: =0; if b=0 thenbeginb: =1; goto l; end; readln; end.
программу проверил все работает
имя возраст занятие
оля 13 пение
петя 14 баскетбол
вася 13 хоккей
катя 15 танцы
коля 11 баскетбол
серёжа 11 футбол
пусть х лет мальчику, тогда
(х+2)/(х-2)=2
х+2=2(х-2)
х+2=2х-4
х=6лет мальчику
пусть у лет девочке, тогда
(у+3)/(у-3)=3
у+3=3(у-3)
у+3=3у-9
2у=12
у=6 лет девочке
ответ : мальчик и девочка одного возраста
не ворую
не лгу
слабым
Популярные вопросы