vitbond12

09.08.2020

PASCAL Составьте программу, которая найдет отношение двух ВВЕДЕННЫХ ЧИСЕЛ. оно должно быть больше 1 по модулю и должно существовать, то есть нужно делить большее число на меньшее

Информатика

Ответить

Ответы

isinyakin

09.08.2020

var x, y, res: real;

label back;

begin

back:

Readln(x); Readln(y);

if x > y then res := x / y else res := y / x;

if res < 1 then goto back;

Writeln(res);

end.

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

PASCAL Составьте программу, которая найдет отношение двух ВВЕДЕННЫХ ЧИСЕЛ. оно должно быть больше 1 по модулю и должно существовать, то есть нужно делить большее число на меньшее

▲

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

Год, в котором французский инженер валтат выдвинул идею использования двоичной системы счисления при создании механических счётных устройств.

Сравните структуру полного имени файла на компьютере и URL-адрес в сети. Результат сравнения покажите в таблице, выделив сходства и различия

Перевести из линейной записи в обычную: а) a/b/c б) ab/c в) a/bc г) a/bc д) a+b/c е) (a+b)/c ж) a/bc**d з) 1/(1+x*x) и) 1/(1+x2) к) sqrt(x2+y2) л) x(1/3) м) 1/x(1/3) н) sin(x)2+sin(y...

Укажите, какие символы запрещено использовать в имени файла в os windows. 1) ? 2) : 3) " " 4) . 5) - 6) !

Используя оператор for напишите программу которая выводит целые числа в диапазоне от 1 до 25(включительно) с шагом

Написать программу удвоения меньшего из двух чисел (числа вводятся с клавиатуры)

Определите тип каждого из следующих носители информации звуковые волны

Объясните функции основных инструментов программы

Составить алгоритм одноклеточная амеба каждые 3 часа делится на 2 части. сколько амеб будет через 3, 6, часа

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

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

Год, в котором французский инженер валтат выдвинул идею использования двоичной системы счисления при создании механических счётных устройств.

Сравните структуру полного имени файла на компьютере и URL-адрес в сети. Результат сравнения покажите в таблице, выделив сходства и различия

Перевести из линейной записи в обычную: а) a/b/c б) a*b/c в) a/b*c г) a/b**c д) a+b/c е) (a+b)/c ж) a/b**c**d з) 1/(1+x*x) и) 1/(1+x**2) к) sqrt(x**2+y**2) л) x**(1/3) м) 1/x**(1/3) н) sin(x)**2+sin(y...

Укажите, какие символы запрещено использовать в имени файла в os windows. 1) ? 2) : 3) " " 4) . 5) - 6) !

Используя оператор for напишите программу которая выводит целые числа в диапазоне от 1 до 25(включительно) с шагом

Написать программу удвоения меньшего из двух чисел (числа вводятся с клавиатуры)

Определите тип каждого из следующих носители информации звуковые волны

Объясните функции основных инструментов программы​

Составить алгоритм одноклеточная амеба каждые 3 часа делится на 2 части. сколько амеб будет через 3, 6, часа

Перевести из линейной записи в обычную: а) a/b/c б) ab/c в) a/bc г) a/bc д) a+b/c е) (a+b)/c ж) a/bc**d з) 1/(1+x*x) и) 1/(1+x2) к) sqrt(x2+y2) л) x(1/3) м) 1/x(1/3) н) sin(x)2+sin(y...

Объясните функции основных инструментов программы