Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
AlinaVoronova
26.05.2020 12:43 •
Информатика
Сделать по информатике сформировать символьный массив из 6 слов, обозначающих признак предмета. на экран вывести слова женского рода ( окончание ая или яя ) написать программу для visual basic
👇
Увидеть ответ
Открыть все ответы
Ответ:
viktoriag373
26.05.2020
25
[0, 0, "a", 1]
[1, 1, "b", 2]
[1, 2, "bb", 3]
[2, 2, "b", 4]
[1, 3, "bbb", 5]
[2, 3, "bb", 6]
[3, 3, "b", 7]
[1, 4, "", 8]
[2, 4, "bbb", 9]
[3, 4, "bb", 10]
[4, 4, "b", 11]
[1, 5, "", 12]
[2, 5, "", 13]
[3, 5, "bbb", 14]
[4, 5, "bb", 15]
[5, 5, "b", 16]
[0, 6, "aa", 17]
[6, 6, "a", 18]
[6, 7, "aa", 19]
[7, 7, "a", 20]
[6, 8, "aaa", 21]
[7, 8, "aa", 22]
[8, 8, "a", 23]
[5, 9, "baaab", 24]
[9, 9, "b", 25]
s = "aaaab"
n = 0
for r in 0...s.size
for l in 0..r
t = s[l..r]
if t.reverse == t
n += 1
p [l,r,t,n]
end
end
end
4,6
(8 оценок)
Ответ:
Gelag
26.05.2020
Var
N, s, i: Integer;
s1: real;
begin
readln(N); {общий ввод для всех задач}
if N < 0 then
writeln('Задача 1. N=', 0)
else writeln('Задача 1. N=', N + 4);
s := 0;
for i := 1 to n do
s := s + i;
writeln('Задача 7. 1+2+3+…+N=', s);
write('Задача 9. Последовательность от N до 1 = ');
for i := n downto 1 do
write(i, ' ');
writeln();
s1 := 0;
for i := 1 to n do
s1 := s1 + i / 10;
writeln('Задача 12. 0,1+0,2+0,3+..+N/10=', s1);
write('Задача 13. Последовательность квадратов от 1 до N = ');
for i := 1 to n do
write(i * i, ' ');
writeln();
write('Задача 14. Последовательность первых N нечетных чисел = ');
for i := 1 to n do
write(2 * i - 1, ' ');
writeln();
if N > 0 then
writeln('Задача 20. N степень 3 = ', frac(ln(n) / ln(3)) = 0);
s := 0;
for i := 1 to n do
if n mod i = 0 then
s := s + i;
writeln('Задача 24. Сумма всех натуральных делителей числа N (сключая 1 и N) = ', s);
end.
4,6
(95 оценок)
Это интересно:
Д
Дом-и-сад
16.05.2021
Как заменить шнурки в жалюзи - простой и быстрый способ...
19.08.2022
Как выглядеть старше подросткам: советы от экспертов...
К
Кулинария-и-гостеприимство
23.05.2023
Как использовать галогенную печь: простой и быстрый гид...
О
Образование-и-коммуникации
25.10.2021
Секреты общения с глухими людьми: как научиться понимать и быть понятым...
С
Семейная-жизнь
08.02.2021
Остановите драку! Как сделать так, чтобы ваш малыш перестал драться...
К
Компьютеры-и-электроника
09.03.2021
Изучаем, как создать общедоступный календарь в Outlook...
К
Компьютеры-и-электроника
08.05.2020
Как получить очки отряда в Call of Duty Ghosts?...
О
Образование-и-коммуникации
29.04.2023
Как создать комиксы в стиле Манга...
О
Образование-и-коммуникации
20.10.2021
Как поступить в Техасский аграрный университет...
О
Образование-и-коммуникации
30.06.2021
Как использовать логарифмические таблицы: практическое руководство...
Новые ответы от MOGZ: Информатика
Bossip
10.02.2022
Напишите программу которая считывает строку с клавиатуры затем выводит на каждой строке этот символ столько раз какой он по счету в данной строке отсчёт начинается с 1 (тема строки...
zena30331
08.06.2020
Тренер спортивного комплекса может работать на полную занятость или гибкое количество часов. Базовая оплата тренера с полной занятостью 20000, но есть система повышающих коэффициентов:...
наифа
20.02.2022
Укажите какое логическое выражение равно сильно выражению ...
Kiraпомошник
10.07.2021
Хелп. нужно на python написать, сам на паскале могу/ но блин нужно на питоне...
girlmarta
09.10.2020
Составить программу вычисления суммы . расчет ввести до тех пор, пока разность между значениями двух соседних членов ряда по абсолютной величине не станет меньше заданной точности...
Катаріна12
22.05.2020
Что такое естественные и формальные языки?...
SonyaKot1
22.05.2020
Нужно выбрать одну из философских концепций информации (атрибутивная, функциональная, антропоцентрическая) , как более правильную. ответить на вопрос: почему ты считаешь, что именно...
ajshshdj
05.04.2023
6. Выбери основные функции операционной системы: А) Устройство ввода и вывода информаци Б) Управляет ресурсами компьютера В) Устройство, для обработки информации Г) Загружает и...
ALEXDEMI777
20.02.2022
Что выражают следующие обазначения : cl2,3cl, 2h2, 5h2o, 3h+, o2-...
kivialisalittlee
20.02.2022
Верно ли утверждение 7 ∈ z, 7не пренадлежит n? , 7 не принадлежит q ? 7 ∈ r , -3,8 ∈ q...
MOGZ ответил
В треугольнике ABC медиана СМ равна половине стороны АВ, ∟A = 47 °, ∟B = 43...
Запишите, какие углы на рисунке 210 являются: 1) односторонними при прямых ВС...
Угол ABC равен 60 °, а угол BCD - 120 °. Можно утверждать, что прямые АВ i CD...
С восьми углов, образованных при пересечении прямых а и b прямой с, четыре угла...
Угол между прямыми а и с равен углу между прямыми b и с. Можно утверждать, что...
Точки М и К принадлежат соответственно боковым сторонам АВ i ВС равнобедренного...
На рисунке 216 АВ = ВС, CD = DK. Докажите, что АВ ‖ DK...
На рисунке 219 АВ = CD, ВС = AD. Докажите, что АВ ‖ CD...
Медианы АЕ i CF, проведенные к боковым сторонам ВС i AB равнобедренного треугольника...
На рисунке 217 АК - биссектриса угла ВАС, AM = МК. Докажите, что МК ‖ АС...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
[0, 0, "a", 1]
[1, 1, "b", 2]
[1, 2, "bb", 3]
[2, 2, "b", 4]
[1, 3, "bbb", 5]
[2, 3, "bb", 6]
[3, 3, "b", 7]
[1, 4, "", 8]
[2, 4, "bbb", 9]
[3, 4, "bb", 10]
[4, 4, "b", 11]
[1, 5, "", 12]
[2, 5, "", 13]
[3, 5, "bbb", 14]
[4, 5, "bb", 15]
[5, 5, "b", 16]
[0, 6, "aa", 17]
[6, 6, "a", 18]
[6, 7, "aa", 19]
[7, 7, "a", 20]
[6, 8, "aaa", 21]
[7, 8, "aa", 22]
[8, 8, "a", 23]
[5, 9, "baaab", 24]
[9, 9, "b", 25]
s = "aaaab"
n = 0
for r in 0...s.size
for l in 0..r
t = s[l..r]
if t.reverse == t
n += 1
p [l,r,t,n]
end
end
end