Предмет: Информатика,
автор: alekskkv95
дано целое число в диапазоне 10-99.вывести строку название цифры на которую заканчивается данное число на русском языке(0-ноль.1-один.....)матлаб
Ответы
Автор ответа:
0
program abc;
var a,b:integer;
begin
readln(a);
b:=a mod 10 ;
if(b=0) then Writeln('Ноль') else
if(b=1) then Writeln('Один') else
if(b=2) then Writeln('Два') else
if(b=3) then Writeln('Три') else
if(b=4) then Writeln('Четыре') else
if(b=5) then Writeln('Пять') else
if(b=6) then Writeln('Шесть') else
if(b=7) then Writeln('Семь') else
if(b=8) then Writeln('Восемь') else
Writeln('Девять');
end.
var a,b:integer;
begin
readln(a);
b:=a mod 10 ;
if(b=0) then Writeln('Ноль') else
if(b=1) then Writeln('Один') else
if(b=2) then Writeln('Два') else
if(b=3) then Writeln('Три') else
if(b=4) then Writeln('Четыре') else
if(b=5) then Writeln('Пять') else
if(b=6) then Writeln('Шесть') else
if(b=7) then Writeln('Семь') else
if(b=8) then Writeln('Восемь') else
Writeln('Девять');
end.
Похожие вопросы
Предмет: Химия,
автор: GreatBlaster
Предмет: Биология,
автор: miha0tiktok
Предмет: Қазақ тiлi,
автор: altaigulim7
Предмет: Математика,
автор: лерочка55555
Предмет: Биология,
автор: Аноним