Ask and answer as in the examples. Use the prompts in Ex. 3 and the expressions in Ex. 9a A: How about spaghetti tonight? B: Yuck! I hate it./Wow! That's great.
134
345
Ответы на вопрос:
A: How about spaghetti tonight? — Как насчет спагетти сегодня вечером?
B: Yuck! I hate it. / Wow! That’s great. — Фи! Я ненавижу их. /Ух ты! Это круто.
ответ:
A: How about hamburgers tonight? — Как насчет гамбургеров сегодня вечером?
B: Ugh! I don’t like hamburgers./Wow! I love hamburgers. — Фу! Я не люблю гамбургеры/Ух ты! Я люблю гамбургеры.
B: Yuck! I hate it. / Wow! That’s great. — Фи! Я ненавижу их. /Ух ты! Это круто.
ответ:
A: How about hamburgers tonight? — Как насчет гамбургеров сегодня вечером?
B: Ugh! I don’t like hamburgers./Wow! I love hamburgers. — Фу! Я не люблю гамбургеры/Ух ты! Я люблю гамбургеры.
USES Crt; LABEL R1,R2;
VAR X: INTEGER; M:CHAR; BEGIN
R1:ClrScr; WriteLn('ПРГ выводит оценки по математике, физике и химии');
WriteLn('1.Вывод оценок по предметам');
WriteLn('2.Выход');
WriteLn('Введите номер пункта');
ReadLn (X);
CASE X OF
1: Begin
ClrScr; WriteLn(' По какому предмету Вы хотите увидеть оценки'); WriteLn(' М - математика');
WriteLn(' Ф - физика');
WriteLn(' Х - химия');
ReadLn(M);
CASE M OF
'М','м':WriteLn('5 5 4 4 5 5 3 5 5 ');
'Ф','ф':WriteLn('5 4 5 3 5 4 5 5 5 ');
'Х','х':WriteLn('4 3 5 3 4 4 4 5 ');
End;
End;
2: Begin
WriteLn('Программа закончена');
GoTo R2;
End;
Else
WriteLn('Номер неверен'); ReadLn;
GoTo R1;
End;
R2:End.
VAR X: INTEGER; M:CHAR; BEGIN
R1:ClrScr; WriteLn('ПРГ выводит оценки по математике, физике и химии');
WriteLn('1.Вывод оценок по предметам');
WriteLn('2.Выход');
WriteLn('Введите номер пункта');
ReadLn (X);
CASE X OF
1: Begin
ClrScr; WriteLn(' По какому предмету Вы хотите увидеть оценки'); WriteLn(' М - математика');
WriteLn(' Ф - физика');
WriteLn(' Х - химия');
ReadLn(M);
CASE M OF
'М','м':WriteLn('5 5 4 4 5 5 3 5 5 ');
'Ф','ф':WriteLn('5 4 5 3 5 4 5 5 5 ');
'Х','х':WriteLn('4 3 5 3 4 4 4 5 ');
End;
End;
2: Begin
WriteLn('Программа закончена');
GoTo R2;
End;
Else
WriteLn('Номер неверен'); ReadLn;
GoTo R1;
End;
R2:End.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
ledzep13.06.2020 10:40
-
alisaBacura24.07.2020 11:17
-
resetmac14.04.2020 20:05
-
anitamirzikkk17.05.2020 02:29
-
Вета200806.05.2021 04:53
-
mishelmarriano02.04.2021 09:29
-
Vladikf01Vlad22018.11.2022 08:12
-
EfaliyaRom04.10.2022 01:28
-
jena601.10.2020 09:25
-
huilo424.03.2020 21:08
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.