Вpascal abc необходимо: 1. вывести на экран все двузначные числа, которые нацело делятся на число, введённое пользователем. 2. даны трёхзначные натуральные числа n и k (n < k). из чисел от n до k найти все, запись которых содержит ровно две одинаковые цифры. например, числа 266, 661, 767, 776 – содержат ровно 2 одинаковые цифры. 3. дано два целых положительных числа a и n, вводимых с клавиатуры (выполнить проверку на выполнения данного условия). найти an и na. дополнительно: 4*. найти всех прямоугольники (указать длины их сторон), площадь которых равна s, а стороны a и b выражены натуральными числами. примечание. пользователь с клавиатуры вводит значение площади прямоугольника s, программа выводит список всех возможных сочетаний сторон.

Ответы

irinamiller93 11.06.2020 02:49

Program P;
Var
   n, i : Integer;
Begin
   Write('Enter n ');
   ReadLn(n);

   i := n;
   while i <= 99 do
   Begin
       Write(i, ' ');
       i := i + n;
   End;

   ReadLn;
End.

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

rustik1619 19.05.2020 21:10

1)Программа WRITE (‘Введи два числи’); READ (А,В); IF A B THEN S:= A ELSE S:=B; WRITE (S); Входные данные:12,15 2)WRITE (‘Введите число’); READ ( X); IF X =10 THEN Y:=210...

Mашka 19.05.2020 21:11

Завдання 1: Перевести з десяткової системи числення у двійкову числа: 53, 27, 103, 225, 38,10 Завдання 2: Перевести з двійкової у десяткову числа: 110101, 1000011, 10101011,...

ky3325masha 19.05.2020 21:11

за 3 задания 1) Дана последовательность операторов :а:=1;b:=1;repeata:= a+1;b=b*3until b a;СКОЛЬКО РАЗ БУДЕТ ПОВТОРЯТСЯ ЦИКЛ2) В Результате выполнения фрагмента программы:...

makskot69 19.05.2020 21:12

№ 4. Записать на языке Паскаль:1) а = (b + с)22) а = b – с3) а = b/c4) а = bc5) а = √b2 + с2 6) а = b 7) а = sinb8) а = а + b...

Ochoba007 14.04.2020 11:54

Банкке 3% салыммен S теңге салынды. N жылдан кейін салым қанша болады?...

АндрейZAV 14.04.2020 11:54

Определите сколько цветов в палитре изображения если его обьем равен 22500 байт а размеры изображения...

Хорошоучусь 13.03.2020 16:00

В массиве записаны результаты 20 игр футбольной команды (если игра окончилась выигрышем данной команды, то записано число 3, проигры- шем — 2, если игра окончилась вничью...

Аня24204 13.03.2020 17:48

Составить блок-схему алгоритма и программу для обработки массива из 20 чисел X = (0,3; 5; 69; –3; 52; –20; –9; –23; –9; 10; 36; 12; 15; 23; –0,2; –36; –0,3; 8; 45; –7)...

sarababy777 20.10.2020 14:19

Снаряд массой 10 кг на корабле массой 100 тонн в состоянии покоя имеет скорость 0,1 м / с после попадания в горизонтальную плоскость. Предположим, что удар по кораблю неупругий,...

Hasky12 20.10.2020 14:19

Это тест нужено (можете не все решить но хоть что-то Фразеологізмами є всі вислови, ОКРІМ А пашіти вогнемБ у вогонь і у водуВ гріє вогоньГ і з вогнем не знайти2. Фразеологізмами...

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