Помогите пожалуйста решить инфографику :Составьте программу для решения задачки,которая
Помогите пожалуйста решить инфографику :
Составьте программку для решения задачи,которая инспектирует,может ли посещать ребёнок ребяческий сад,т.е его воздаст до 6 лет.Посчитайте через сколько лет он станет школьником.
1 ответ
Анастасия Травинова
Program Test;
Var Vozrast: integer; Bol, Mistake: boolean;
Begin
Bol := true;
Write('Введите возраст малыша: ');
Readln(Vozrast);
Writeln();
if (Vozrast gt; 6) then
Writeln('Ребенок не может посещать ребяческий сад')
else if (Vozrast lt;= 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.
Var Vozrast: integer; Bol, Mistake: boolean;
Begin
Bol := true;
Write('Введите возраст малыша: ');
Readln(Vozrast);
Writeln();
if (Vozrast gt; 6) then
Writeln('Ребенок не может посещать ребяческий сад')
else if (Vozrast lt;= 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.
Егор Залещанский
Спасибо огромное
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Put the verb in brackets into the Present Indefinite.
1The Volga ,
Английский язык.
Облако тегов