Регистрация
shingekinokoyji
14.06.2023 21:17
Информатика
Есть ответ 👍

4. Дано слово. Напишите программу, которая выводит на экран все буквы, кроме L.

175
347
Посмотреть ответы 1

Ответы на вопрос:

arsen20171
arsen20171
4,5(88 оценок)
Const     n = 33; var     a: array[1..n] of integer;     i,c,p: integer; begin c: =0; p: =0; randomize; write('исходный массив: '); for i: = 1 to n do       begin       a[i]: =random(2*n+1)-n;       write(' ',a[i]);       if a[i] mod 2 = 0 then c: =c+1;       if (a[i] mod 5 = 0)and(a[i] mod 10 < > 0) then p: =p+1       end; writeln; writeln('количество чётных чисел: ',c); writeln('количество чисел, оканчивающихся на 5: ',p); end.

Популярно: Информатика