Регистрация
vehera087
14.10.2020 15:11
Информатика
Есть ответ 👍

Встроке заменить все двоеточие(: )точкой с запятой (; )подсчитать количество замен

160
349
Посмотреть ответы 3

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

tatianIWANOWNA
tatianIWANOWNA
4,7(17 оценок)
Var a: string; i,k: integer; begin     readln(a);         for i: =1 to length(a) do             if a[i]=': 'then                 begin                     a[i]: ='; ';                   k: =k+1;                 end; writeln(k); end.
Агаисмаил1
Агаисмаил1
4,5(70 оценок)
Var s: string; i, k: integer; begin k : = 0; readln(s); for i : = 1 to length(s) do if (s[i] = ': ')then begin s[i] : = '; '; inc(k); end; writeln(s); writeln(k); end.
Настяданеона
Настяданеона
4,4(66 оценок)

2916 пикселей * 8 бит = 23 328 бит

Объяснение:

256 цветов - это 8 бит (1 байт) на 1 пиксель.

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