Введите ряд чисел,но как только пользователь вводит -1 программа должна сосчитать кол-во четных и нечетных сделайте программу в паскале

👇

Ответ:

vdimitrievap0donn

09.12.2020

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ReadSeqIntegerWhile(t->t<>-1).ToArray;
var k:=a.Where(x->x.IsEven).Count;
Writeln('Четных чисел ',k,', нечетных ',a.Length-k)
end.

Пример
5 12 -3 7 0 12 43 -24 17 -1
Четных чисел 4, нечетных 5

4,4(42 оценок)

Открыть все ответы

Ответ:

bondarsvetlana25

09.12.2020

Pascalabc.net 3.4.0, сборка 1675 от 12.06.2018 внимание! если программа не работает, обновите версию! procedure println(self: array of real); extensionmethod; begin self.batch(5).foreach(s-> begin foreach var p in s do write(p: 15: 10); writeln end); writeln(min(15*(self.count div 2),38)*'- ') end; begin var m: =arrgen(readinteger('n='),i-> cos(i),1); m.println; var (a,b): =readreal2('введите границы a b: '); writeln('число элементов на интервале [',a,',',b,'] равно ', m.where(t-> t.between(a,); write('сумма элементов, расположенных после максимального, равна '); var imax: =m.indexmax; (m? [imax+1: ].sum).println; writeln('элементы, по убыванию модулей'); m: =m.orderbydescending(t-> abs(; m.println; end.

4,4(81 оценок)

Ответ:

SirykValia

09.12.2020

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

если вам больше нравится информация в формате видеоуроков, то на сайте есть видеоурок робот. простые команды.

у любого исполнителя должна быть система команд (ски — система команд исполнителя). система команд исполнителя — совокупность всех команд, которые может выполнить исполнитель. в качестве примера рассмотрим дрессированную собаку. она умеет выполнять некоторые команды — «сидеть», «лежать», «рядом» и т. п. это и есть ее система команд.

простые команды робота

у нашего робота тоже есть система команд. сегодня мы рассмотрим простые команды робота. всего их 5:

вверх

вниз

влево

вправо

закрасить

результат выполнения этих команд понятен из их названия:

вверх — переместить робота на одну клетку вверх

вниз — переместить робота на одну клетку вниз

влево — переместить робота на одну клетку влево

вправо — переместить робота на одну клетку вправо