Помогите Решить 4 любые задачки: 1)С клавиатуры вводится последовательность чисел,

Question

Помогите Решить 4 любые задачки: 1)С клавиатуры вводится последовательность чисел,

Помогите Решить 4 любые задачки:
1)С клавиатуры вводится последовательность чисел, заканчивающаяся 0. Сколько элементов последовательности превосходит число 100?
2)Вводится последовательность из 10 вещественных чисел. Вычислить сумму частей, не превышающих числа А.
3)С клавиатуры вводится последовательность из 7 целых чисел. Найти каких чисел больше: четных либо нечетных.
4)С клавиатуры вводится последовательность из 9 чисел. Отыскать разность меж макимальным и наименьшим элементами.
5)С клавиатуры вводится последовательность чисел, заканчивающаяся 0. Отыскать порядковый номер отрицательного элемента, если считать элементы справа. В случае нескольких отрицательных частей вывести номер заключительного из их (т.е. самого правого).
6)С клавиатуры вводится последовательность чисел, оканчивающаяся 0. Отыскать порядковый номер первого двузначного элемента последовательности, считая элементы в прямом порядке.
7)С клавиатуры вводится последовательность положительных чисел, заканчивающаяся 0. Отыскать сумму двузначных элементов последовательности.
8)С клавиатуры вводится последовательность чисел, оканчивающаяся 0. Отыскать творение отрицательных частей последовательности.
9)С клавиатуры вводится последовательность чисел, оканчивающаяся 0. Отыскать в ней малый элемент.
10)С клавиатуры вводятся числа 2, 5 либо 10, означающие удаления игроков на соответствующее кол-во минут. Условно положительные значения значат удаления в команде А, а отрицательные - в команде В. Для завершения ввода данных используется 0. Сколько всего штрафного времени заработано командами А и В раздельно, а также найти общее штрафное время.

Задать свой вопрос

Берпштейн Ангелина 2018-12-19 04:31:18

Во первых, за 5 банкетов мало кто решать будет, во вторых... Даже читать эту уродливую кучу текста не хочется... Можешь даже не смотреть, врятли кто-или решит.

Анастасия Иванов-Вано 2018-12-19 04:33:18

а ты можэеш решить если я повышу баллы

Валентина Чаленко 2018-12-19 04:40:46

Я это даже читать не желаю. Я об этом и говорю. А если бы задания были занимательными то и бесплатно бы решил.

Эвелина Белосветова
Информатика
2018-12-19 04:24:28
0
1

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

если в равнобедренной трапеции диагонали обоюдна перпендекулярны, то площадь этой трапеции

Выпишите предложения, в которых есть сущ. общего рода. Просклоняйте 2 из

В бассейн входят две трубы, если открыть одну трубу то бассейн

Сделайте пожалуйста задание А и В

как расставить арифметические знаки , чтоб получилось верное равенство

.В итоге реакции , термохимическое уравнение которой С ( графит )

Даны функции y = f(x) и y = g(x), где f(x)

прилогателное от слова четверг

ребят, очень безотлагательно нужны цитаты характеризующие героев из творения Евгений Онегин

Дан массив состоящ из 15 целых чисел,заполненых случ.образом в интервале от

Звездаков Тема · Answer 1 · 2018-12-19 04:27:37+3:00

Звездаков Тема 2018-12-19 04:27:37

Var A,b,N:integer; Begin Read(n); If n=0 then writeln('штрафное время не заработано') else While nlt;gt;0 do If ngt;0 then a:=a+n else b:=b+n; Writeln('a-',a,'b-',b,'общее-',a+b); End.

Эмилия Провова 2018-12-19 04:42:46

Проверь программки, могут быть не отлажены

Мишаня Татченков 2018-12-19 04:44:28

ага

Маргарита Воинова 2018-12-19 04:45:46

Var Min,n:real; Begin Read(n); If n=0 then writeln('error') else begin Min:=n; While n<>0 do begin If n

Крандиевкая Алиса 2018-12-19 04:50:18

10 и 9

Рыжевский Егор 2018-12-19 04:55:40

Var I,n,c,f:integer; Begin For I:=1 to 7 do begin Read(n);If n mon 2=0 then c:=c+1 else f=f+1;End;If c>f then writeln('четные') else writeln('нечетные');End.

Иван Трофилев 2018-12-19 05:04:10

Третия

Поревкина Танечка 2018-12-19 05:05:54

Var Max,min,n:real; I:integer; Begin Read(n); min:=n; max:=n;For I:1 to 8 do begin Read(n);If nmax then max:=n;End;Writeln(max-min);End.

Nikolaj 2018-12-19 05:10:05

4-ая

Евгений Литвейко 2018-12-19 05:14:11

если если позже пригодится обращайся, лучше деньком, вечерком я занят

Valentina Korenbam 2018-12-19 05:17:33

спасибо хорошо

О проекте

Помогите Решить 4 любые задачки: 1)С клавиатуры вводится последовательность чисел,

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