Kaodbedby
5 год назад
Программа в паскале без if,else,while и тому подобные:Определить является ли число однозначным.
ОТВЕТЫ
Дмитрий
Oct 24, 2020
var input:integer;
begin
write('Enter number - ');
readln(input);
case input of
1..9:writeln('Odnozhachnoe!');
else writeln('Error!');
end;
end.
begin
write('Enter number - ');
readln(input);
case input of
1..9:writeln('Odnozhachnoe!');
else writeln('Error!');
end;
end.
130
