Информатика 10 класс!!!!!!!!!проходим case 2. Дано число К. Вывести фразу «Мы выучили К правил» (1 - «1 правило», 12 – «12 правил», 22- «22 правила»).
Информатика 10 класс!!!!!!!!!проходим case
2. Дано число К. Вывести фразу «Мы выучили К правил» (1 - «1 правило», 12 – «12 правил», 22- «22 правила»).
Гость
Ответ(ы) на вопрос:
ГостьVar k:1...k; Begin Read (k); Case n of 1,21: writeln ('мы выучили'k' правило'); 2...4,23,22,24 : ('мы выучили ,k, правила'); 5...20: ('мы выучил ,k,'правил'); 22: ( ну тут уже как выше); End; End. Мы это ещё в 7-Ом проходтли End.
Гостьvar k:integer;
begin
read(k);
case k of
*Все цифры, оканчивающиеся на 1*: write('Мы выучили ',k,' правило');
*Все цифры, оканчивающиеся на 2, 3, 4*: write('Мы выучили ',k,' правила');
else write('Мы выучили ',k,' правил');
end;
end.
Не нашли ответ?
Похожие вопросы