Регистрация
Эвелиночкаddd
03.11.2021 02:00
Информатика
Есть ответ 👍

экрана вводится строка.
Посчитайте количество МАЛЕНЬКИХ латинских букв в ней. Выведите его на экран.
Постройте НОВУЮ строку, из которой удалены все БОЛЬШИЕ латинские буквы.
Выведите количество удалённых символов.

Замечание: массивы использовать нельзя.

251
415
Посмотреть ответы 1

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

belanvlabimir
belanvlabimir
4,8(81 оценок)
Program chik; label  1; var  a: array[1..1000]of  integer; p,w,i,n,min,max,l: integer; begin read(n); for  i: =1  to  n  do begin read(a[i]); end; min: =a[1]; max: =a[1]; for  i: =2 to  n  do begin if(a[i]> max)then begin max: =a[i]; goto  1; end; if(a[i]< min)then  min: =a[i]; 1: end; p: =max; l: =min; for i: =1  to  n  do begin if(a[i]=max)then  a[i]: =l; if(a[i]=min)then  a[i]: =p; end; for i: =1 to  n  do begin write(a[i],'  '); end; end.

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