Дана последовательность целых чисел, заканчивающаяся числом 0. требуется вывести на экран числа этой последовательности, которые были больше среднего арифметического. программе дается последовательность целых чисел. гарантируется, что объём входных данных не превышает 512 килобайт. все числа по модулю не превосходят 2^30.
229
379
Ответы на вопрос:
//pascalabc.net 3.1 сборка 1200 uses system; var n: longint; begin var s : = new list< longint> (); repeat readln(n); if n < > 0 then s.add(n); until n = 0; println(s); var av : = s.average; println(s.where(x -> x > av)); end.
1. #include < stdio.h> #include < ctype.h> int main(int argc, char** argv){ char a, b, c, d; if (scanf("%c%c%c%c", & a, & b, & c, & d) ! = 4) printf("input error\n"); else { if (isdigit(a) & & isdigit(b) & & isdigit(c) & & isdigit(d) & & (a > '0')) printf("sum is %d\n", a + b + c + d - 4 * '0'); else printf("is itn't correct number\n"); } return 0; }
Популярно: Информатика
-
лапка2719.01.2023 08:13
-
Alaaxbek25.03.2021 20:33
-
Zvezdo4kaKatty11.09.2022 15:22
-
podshchipkova04.04.2020 12:55
-
sevara1705.12.2020 03:23
-
maximyakimov20p00ywe04.09.2020 15:00
-
VikiKot131522.05.2022 06:55
-
Малика2009109.08.2020 03:14
-
edinorozhkaXazal16.12.2020 15:34
-
cooldown22910.05.2020 21:00