В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
djiner
djiner
15.05.2021 03:23 •  Информатика

1. Наведіть приклади значень текстових величин. 2. Чим відрізняються значення символьного та рядкового типів? 3. Як описати величини символьного та рядкового типів мовами програмування? Що спільного та які є відмінності в описі текстових величин мовами Free Pascal і Python? 4. Які спільні властивості мають текстове поле й текстовий напис? Які є особливі властивості текстового поля? 5. У яких випадках у середовищі програмування Lazarus властивості Enabled текстового поля слід надати значення False? 6. Які операції можна виконувати з текстовими величинами? 7. Які функції використовують у мовах програмування для опрацювання текстових величин? 8. Чому програмний код у проекті може не виконатися взагалі, або в програмі можуть бути отримані неправильні результати? 9. Яких помилок допускаються при складанні програм у середовищах програмування? 10. У чому полягає процес налагодження програми? 11. З якою метою у програмах, написаних мовами програмування, використовують коментарі? 12. Як у середовищах програмування здійснюють контроль над значеннями змінних у процесі виконання програми?

Показать ответ
Ответ:
Mymir06
Mymir06
13.03.2023 12:01

Не сказала бы, что это решение сильно отличается от уже имеющегося, но 

а) оно совсем немножко удобнее (хотя бы из-за ClrScr и вывода ответа с определённым количеством знаков после запятой). А ещё предусмотрена возможность отсутствия таковых чисел.

б)ну не могла я пропустить задачу по паскалю)

 

Program n1;
Uses CRT;
Const n=10;
Var a: array[1..n] of integer;
i,s,k: integer;
begin
ClrScr;
Randomize;
For i:=1 to n do
begin
a[i]:=random(10);
write(a[i]:3);
If a[i]=i then
begin
s:=s+a[i];
writeln('s=',s);
k:=k+1;
end;
end;
writeln;
If k=0 then writeln('таких элементов нет') else
Writeln('Среднее арифметическое элементов массива, равных своим индексам, равно ',s/k:4:4);
readln
end.

0,0(0 оценок)
Ответ:
екатерина700
екатерина700
13.03.2023 12:01

Последняя цифра числа - остаток деления на N, где N - основание системы счисления. Соответственно, последние две цифры - остаток от деления на N^2.

 

12₄ = 1*4 + 2 = 6₁₀

 

Выходит, что нам нужно найти все десятичные числа, которые не превосходят 40 и  при делении на 16 дают остаток 12.

 

Общий вид таких чисел: k*16 + 6. K - любое целое неотрицательное число. Теперь просто подставляем.

если k = 0, то получается число 5.

если k = 1, то получается число 22.

если k = 2, то получается число 38.

Очевидно, что дальше мы выйдем за границы нужного нам диапазона.

 

ответ: 5, 22, 38

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота