ПООООМОООГИТЕЕЕ!!!!
1)Ввести двузначное число. Определить имеется ли в записи числа цифра 3.
ПАСКАЛЬ!
Ответы
Ответ дал:
0
Program z1;
var a,b,c:integer;
begin
Write('Введите двузначное число: '); read(a);
b:=a div 10;
c:=a mod 10;
if (c=3) or (b=3) then Writeln('В числе присутствует цифра 3')
else Writeln('В данном числе нет цифры 3');
end.
var a,b,c:integer;
begin
Write('Введите двузначное число: '); read(a);
b:=a div 10;
c:=a mod 10;
if (c=3) or (b=3) then Writeln('В числе присутствует цифра 3')
else Writeln('В данном числе нет цифры 3');
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад