М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

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

👇
Ответ:
#13
Вот крч только это убого насамом деле,просто я забыо как через цикл делать но если ты вспомнишь,то красавчик,и да там определяет только большие А и только английские )
program q;
var
a:string;
t,b:integer;
begin

readln(a);

b:=0;

if a[1]= 'A' then t:=b+1
else t:=0;
if a[2]= 'A' then t:=t+1
else t:=t;
if a[3]= 'A' then t:=t+1
else t:=t;
if a[4]= 'A' then t:=t+1
else t:=t;
if a[5]= 'A' then t:=t+1
else t:=t;
if a[6]= 'A' then t:=t+1
else t:=t;
if a[7]= 'A' then t:=t+1
else t:=t;
if a[8]= 'A' then t:=t+1
else t:=t;
if a[9]= 'A' then t:=t+1
else t:=t;
if a[10]= 'A' then t:=t+1
else t:=t;
if a[11]= 'A' then t:=t+1
else t:=t;
if a[12]= 'A' then t:=t+1
else t:=t;
write(t);
end.
4,8(88 оценок)
Открыть все ответы
Ответ:
Sultikutan
Sultikutan
07.05.2021
1) Независимо от условия будет выполнен оператор присваивания.
a:=b
2) Условие ложное, значит будет выполнен оператор после else
write('b')
3) Условие истинное, значит будет выполнен оператор после then
write('a')
4) Функции операторов присваивания одинаковы, значит не зависят от условия (a + b - 14 = b - 14 + a)
a := a + b - 14
5) Оператор a := a практически ничего не изменяет, значит можно избавится от него
if a<b then a:=b
6) То же самое, что и в пункте 5, только нужно поменять истину на ложь
if not(a>b) then a:=b
7) Остаток деления на 2 не может быть равен трем, значит условие всегда ложно. Else нет, значит условный оператор можно смело откинуть
8) Остаток от деления на может быть равен или 0 или 1, значит в любом случае условие истинно. Первый условный оператор можно смело откинуть, но вложеннный остается!
if a<0 then a:=-a
9) Если a отрицательное, тогда b = a, то есть тоже отрицательно. Если a неотрицательное, тогда b = -a, то есть b отрицательное. Можно записать как модуль числа a, умноженный на -1
b := -abs(a)
4,6(89 оценок)
Ответ:
andreitwin
andreitwin
07.05.2021

1. В проводной сети устройства (ноутбуки, настольные компьютеры и т. д.) подключаются к Интернету и другим сетям с кабеля. Беспроводная локальная сеть (LAN) использует радиоволны для подключения различных устройств, например ноутбуков и мобильных телефонов, к Интернету, сети вашей компании и ее приложениям.

2. Просмотр/хранение информации, скачивание/выкачка данных, дистанционное управление устройствами

3. Сеть WIFI влияет на мозг из-за излучений. Беспроводная сеть без устройства её использования бесполезна. Если только вы подключите её и будете сидеть возле роутера. Хотя если рассмотреть этот вопрос с другой стороны, то беспроводные сети как: Bluetooth, WIFI, мобильные данные. В этом случае на зрение оно никак не влияет. Тоесть можно сделать вывод о том, что беспроводные сети не влияют на зрение.

4. По моему мнению, в открытой доступности и мало затраченное время. Человеку проще потратить время (≈1 мин), чтобы найти нужную информацию, чем пойти, например, в библиотеку и взять уже там книгу, которая не факт, что будет об твоей информации.

Вот все ответы, надеюсь они вам

4,4(54 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ