Question

Для каждой цифры (0-9) вывести соответствующее ей название на английском языка. Например 0-zero 1-one и т.д на PASCALABC и C++

Answer 1

uses Timers;

var a,b:integer;

procedure TimerProc;

begin

if b = 0 then writeln('zero');

if b = 1 then writeln('one');

if b = 2 then writeln('two');

if b = 3 then writeln('three');

if b = 4 then writeln('four');

if b = 5 then writeln('five');

if b = 6 then writeln('six');

if b = 7 then writeln('seven');

if b = 8 then writeln('eight');

if b = 9 then writeln('nine');

b:=b+1;

end;

begin

var t := new Timer(100,TimerProc);

 t.Start;

 Sleep(1000);

end.

Answer 2

Sure! Below are examples of how you can write a program in PascalABC and C++ to display the names of digits from 0 to 9 in English.

PascalABC:

pascalCopy code
program DigitNames;

var
  digit: integer;

begin
  for digit := 0 to 9 do
  begin
    case digit of
      0: writeln(digit, '-zero');
      1: writeln(digit, '-one');
      2: writeln(digit, '-two');
      3: writeln(digit, '-three');
      4: writeln(digit, '-four');
      5: writeln(digit, '-five');
      6: writeln(digit, '-six');
      7: writeln(digit, '-seven');
      8: writeln(digit, '-eight');
      9: writeln(digit, '-nine');
    end;
  end;
end.

C++:

cppCopy code
#include <iostream>
using namespace std;

int main() {
    for (int digit = 0; digit <= 9; digit++) {
        switch (digit) {
            case 0:
                cout << digit << "-zero" << endl;
                break;
            case 1:
                cout << digit << "-one" << endl;
                break;
            case 2:
                cout << digit << "-two" << endl;
                break;
            case 3:
                cout << digit << "-three" << endl;
                break;
            case 4:
                cout << digit << "-four" << endl;
                break;
            case 5:
                cout << digit << "-five" << endl;
                break;
            case 6:
                cout << digit << "-six" << endl;
                break;
            case 7:
                cout << digit << "-seven" << endl;
                break;
            case 8:
                cout << digit << "-eight" << endl;
                break;
            case 9:
                cout << digit << "-nine" << endl;
                break;
        }
    }
    return 0;
}

Both programs will output the names of the digits from 0 to 9 in English.