1. Информатика
  2. Написать программу на

Написать программу на яп паскаль: из чисел от 10 до 99 вывести те, сумма цифр которых равна s ( чтобы в программе были формулы по нахождению p1 и p2 и чтобы программа была выполнена через операторы div и mod,желательно с объяснением

averkin07 averkin07    1   20.03.2019 22:06    1

Ответы
timofeevaanyut timofeevaanyut  26.05.2020 10:50

var k,s, p1, p2 : integer;

begin

write('s = ');

readln(s);

for k:= 10 to 99 do

begin

p1:= k div 10;

p2:= k mod 10;

if p1+p2=s then writeln (k);

end;

end.

Пример:

s = 12

39

48

57

66

75

84

93

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
666223 666223  29.08.2019 04:50
2. модем, информацию со скоростью 28800 бит/с, может передать две страницы текста (3600 байт) в течение: a) 1 секунды b) 1 минуты c) 1 часа d) 10 секунд e) 10 минут 3. сколько секунд...
leonik9797 leonik9797  29.08.2019 04:50
Программа,которая обладает к самого произведению и копированию самой себя-это: а) вирус б)загрузочная в)стардатная г)прикладная...
grigoryanoksan grigoryanoksan  29.08.2019 04:50
Архивный файл можно: 1) сжать 2) распаковать 3) запустить на выполнение 4)отредактировать 5) просмотреть...
GAMERINO GAMERINO  29.08.2019 04:50
Получите растровый код и векторное описание для изображения букв «н» и «л» на черно-белом экране с графической сеткой размером 8х8 пикселей. как это вообще делать?...
Ira019 Ira019  29.08.2019 04:50
Программы обслуживания внешних устройств компьютера называют...
89132508504 89132508504  29.08.2019 04:50
Работали в лаборатории. когда они закончили эксперимент, то должны были убрать все реагенты в сейф. чтобы открыть сейф, им нужно было нажать на каждую кнопку сейфа то количество...
EdwardLab EdwardLab  29.08.2019 04:50
Составе программу, которая из трех чисел, введенных с клавиатуры, возводит в квадрат положительные, а отрицательные оставляет без изменения....
Lolycat Lolycat  29.08.2019 04:50
Составьте программу к . вычислить сумму нечетных чисел из интервала от 30 до 50...
KarinaFelton KarinaFelton  29.08.2019 04:50
Одномерный массив заполнить случайными числами. найти в непустом массиве минимальный элемент и определить его порядковый номер. подсчитать количество элементов, равных минимальному....
virtuspro2000 virtuspro2000  29.08.2019 04:41
Раскройте скобки и напишите чему равны переменные а , b: -b = отрицание b 1) (a /\ 1)v (0 v b) = 0 2) (a /\ 1)/\ (0 v b) = 1 3) a /\ b v -b/\ c =1 4) b /\ a v c =0 пример, когда...

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