1. Информатика
  2. Pascal 1. дано 3- х - значное

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

alexxxxarchenko alexxxxarchenko    2   01.04.2019 06:50    1

Ответы
МиссПана МиссПана  28.05.2020 03:48

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. 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Marismak Marismak  15.07.2019 10:00
Информатика, нужна ! заранее . для какого слова истинно высказывание: отрицание(первая буква согласная⇒третья буква согласная)∧пятая буква гласная 1) дерево 2) астра 3) ударник...
NokuShinama NokuShinama  15.07.2019 10:00
Паскаль! как составить программу с которой из слова переосвидетельствование можно составить пять новых...
Школьник5гокласса2 Школьник5гокласса2  15.07.2019 08:22
Смассивами c#, необходимо вывести массивы с словом may и изменить их значения: string[] months = {may, august, april, may, july}буду признателен вам с !...
Про100карина666 Про100карина666  07.07.2019 16:40
Дан двумерный массив размерности 10х10. заполнить его случайными числами на отрезке [-25,25]. в каждой строке массива найти количество элементов, больших заданного числа h. результат...
wenefep07126 wenefep07126  06.08.2019 23:40
Составьте таблицу истинности для логической функции: a v b & c...
Apple8066 Apple8066  06.08.2019 23:40
Для экспериментов нужны кошки с длиной хвоста меньше 20 см. определить, подходит ли для этой цели кошка мурка с длиной хвоста 15 см? с меня и звездачки\...
alenalebedeva2 alenalebedeva2  06.08.2019 23:40
Сообщение нбсщсфуйибупс закодировано шифром цезаря со сдвигом...
partybally partybally  06.08.2019 23:40
Метеорологическая станция ведет наблюдение за влажностью воздуха. результатом одного измерения является целое число от 20 до 40 процентов, которое записывается при минимально возможного...
evika8444 evika8444  04.04.2020 20:18
Дана последовательность a1,a2,...,a9. Отобрать из неё элементы, которые расположены между первым и последним элементами. Вывести эти элементы и их индексы в последовательности...
просвятленный просвятленный  04.04.2020 20:20
в чем разница между управлением в прямом режиме и в программном режиме?2. какие команды входят в СКИ ГРИС; как они выполняются?3. в какой последовательности происходит выполнение...

Популярные вопросы