Pascal

1. Дано 3 - х - значное число. Определить, входит ли в него цифра 6?

2. Напечатать ряд чисел 20 20 20 20 20 20 20 20 20 20

Question

Информатика

Антося

18 июля, 06:18

Pascal

1. Дано 3 - х - значное число. Определить, входит ли в него цифра 6?

2. Напечатать ряд чисел 20 20 20 20 20 20 20 20 20 20

+3

Ответы (1)

Знаете ответ?

Натала · Answer 1

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.

Pascal1. Дано 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