Определите значение переменной а после выполнения алгоритма а: =4 b: =6 b: =8+a*b a: =b/4*a в ответе укажите одно целое число - значение переменной а
213
263
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1627 от 27.01.2018 // внимание! если программа не работает, обновите версию! begin var n: =readlninteger; if not n.inrange(10,100) then begin writeln('ожидалось значение от 10 до 100'); exit end; var famh,namh,faml,naml: string; var (hball,lball): =(-1.0,16.0); loop n do begin var a: =readlnstring.towords; var avg: =(a[2].toreal+a[3].toreal+a[4].toreal)/3; if avg> hball then (famh,namh,hball): =(a[0],a[1],avg) else if avg< lball then (faml,naml,lball): =(a[0],a[1],avg) end; writeln; println('лучший',famh,namh); println('худший',faml,naml) end.
Популярно: Информатика
-
SakhanovMadiar103.06.2020 01:25
-
domiks31.08.2021 16:29
-
мод810.12.2022 05:42
-
mironmashstem08.05.2020 21:10
-
NikolayTop13.04.2022 21:39
-
Zefirka854013.05.2021 02:21
-
justdoit520.09.2022 05:00
-
ankaschamina2015.11.2020 23:52
-
tanya211928630.03.2020 00:46
-
POZZITIFFON3415.09.2022 17:48