Pascal
1. Дано 3- х - значное число. Определить, входит ли в него цифра 6?
2. Напечатать ряд чисел 20 20 20 20 20 20 20 20 20 20
Pascal
1. Дано 3- х - значное число. Определить, входит ли в него цифра 6?
2. Напечатать ряд чисел 20 20 20 20 20 20 20 20 20 20
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var
n : integer;
begin
read (n);
if (n mod 10 = 6) or (n div 100 = 6) or (n div 10 mod 10 = 6) then write ('yes') else write ('no');
end.
var
i : integer;
begin
for i := 1 to 10 do write ('20 ');
end.