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

1) дана рекурсивная функция: function f(n: integer): integer; begin if n> 100 then f: =n-10 else f: =f(f(n+11)) end; вычислите f(98). 2)что будет напечатано программой? s: =0; for i: =1 to 3 do for j: =1 to 3 do a[i,j]: =i*j; for i: =1 to 3 do for j: =1 to 3 do s: =s+a[i,j]; writeln(s); 3)что будет напечатано программой? type stringa = array [1..5] of char; var i: integer; t: stringa; procedure p(var s: stringa); begin i: =1; while s[i]< '9' do begin s[i]: =succ(s[i]); i: =i+1 end end; begin i: =1; t: ='12945'; p(t); write(t[2]) end. 4) укажите верное утверждение. а)использование операторов halt и exit не согласуется с идеологией структурного программирования. б)количество строк и столбцов на экране в текстовом режиме пользователь может менять с специальной процедуры из модуля crt. в)функция random из стандартного модуля crt формирует случайное число.

Ответ:
volter16
volter16
31.07.2020 15:25
1) 91
2) 36
3) 3  (опечатка в условиях: вместо stringa надо писать string)
4) Вроде все верно, но быть может кроме а)
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?