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

ИНФ 8 класс сделать билеты

👇
Открыть все ответы
Ответ:
Aieks01
Aieks01
02.06.2023
Program Test;

Var Vozrast: integer; Bol, Mistake: boolean;

Begin

Bol := true;

Write('Введите возраст ребенка: ');
Readln(Vozrast);
Writeln();

if (Vozrast > 6) then
Writeln('Ребенок не может посещать детский сад')

else if (Vozrast <= 0) then
begin
Writeln('Некорректный ввод данных!');
Mistake := true;
end

else
begin
Writeln('Ребенок может посещать детский сад');
Bol := false;
end;

if (Mistake = false) then
begin
if (Bol = false) then
Writeln('Ребенок станет школьником через ', 7 - Vozrast, ' лет')

else
Writeln('Ребенок уже в школе');
end;

End.
Решить в paskal: составьте программу для решения ,которая проверяет,может ли ребёнок посещать детски
Решить в paskal: составьте программу для решения ,которая проверяет,может ли ребёнок посещать детски
4,5(10 оценок)
Ответ:
zoology1g
zoology1g
02.06.2023
Запишу по порядку последовательности чисел, записанные на всех шагах вплоть до одиннадцатого (слева идёт номер шага):

1)  3
2)  1 3
3)  1 1 1 3
4)  3 1 1 3
5)  1 3 2 1 1 3
6)  1 1 1 3 1 2 2 1 1 3
7)  3 1 1 3 1 1 2 2 2 1 1 3
8)  1 3 2 1 1 3 2 1 3 2 2 1 1 3
9)  1 1 1 3 1 2 2 1 1 3 1 2 1 1 1 3 2 2 2 1 1 3
10)  3 1 1 3 1 1 2 2 2 1 1 3 1 1 1 2 3 1 1 3 3 2 2 1 1 3
11)  1 3 2 1 1 3 2 1 3 2 2 1 1 3 3 1 1 2 1 3 2 1 2 3 2 2 2 1 1 3

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