ів 1. Написати програму, яка виконує наступне: а) приймає з клавіатури в цілочисельну комірку num число - id1593630520220504 от Dasha555m 04.05.2022 15:28

Question

Информатика: ів 1. Написати програму, яка виконує наступне: а) приймає з клавіатури в цілочисельну комірку num число в діапазоні 0...99; б) аналізує число в цілому, а також окремо значення його десятків та одиниць (відповідно, витягує їх з числа і зберігає в окремих комірках a i b); в) виводить на екран значення числа в текстовій формі (5 - п ять або five , 14 - чотирнадцять або fourteen ; 21 - двадцять один або twenty one i т.д.) Програма повинна містити оператори switch-case та if-else.

Dasha555m · Accepted Answer

//PascalABC.NET версия 3.2, сборка 1389

//Если программа не запускается, то обновите версию

uses System.Linq;

begin

writeln('III');

var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;

writeln;

while a.Any() do

begin

write(a[0], ' ');

a.RemoveAt(0);

if not a.Any then break;

write(a.Last, ' ');

a.RemoveAt(a.Count - 1);

if not a.Any then break;

var n := 0;

if a.Count > 1 then n := a.Count div 2 - 1;

write(a[n], ' ');

a.RemoveAt(n);

end;

end.

Объяснение:

MOGZ ответил