1. Информатика
  2. Решить в целых числах

Решить в целых числах уравнение ( ax - b ) / ( cx - d ) = 0. входные данные вводятся 4 числа: a, b, c и d выходные данные вывести значения корней и их количество, вывести фразу "нет корней" при их отсутствии и вывести фразу "solution" если корней бесконечно много. программа на pascal

Аолвлвьвтадвлвл Аолвлвьвтадвлвл    1   02.10.2019 03:20    10

Ответы
ser73 ser73  09.10.2020 10:53

program n5;


uses crt;


var a,b,c,d,x:integer;


begin


read (a,b,c,d);


if (b=0) and (a<>0)then write('solution');


if (b<>0) and (a=0)then write('нет корней');


if (b<>0) and (a<>0) and (b mod a=0) then write (-b div a);

readln;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Fomabarca Fomabarca  20.04.2020 14:19
ИНФОРМАТИКА Сайт на кастором надо сделать - https://repl.it/languages/tkinter...
kolody71p0aje8 kolody71p0aje8  20.04.2020 14:03
Переведите программу о сдаче с языка Кумир на язык Паскаль алг Сдача нач . цел s,k500,k100,k50,k10 . ввод s . k500:=div(s,500) . s:=mod(s,500) . k100:=div(s,100) . s:=mod(s,100)...
egorsh1 egorsh1  20.04.2020 13:56
2. Укажите кодировочные таблицы, в которых каждый символ кодируется с бит:а) ASCI; 6) Windowsг) Unikode: E) КОИ-8.3. Что произойдёт при нажатии клавиши Enter, если курсор находится...
дима2721 дима2721  20.04.2020 14:20
№ 1. Выберите изменение формы представления информации: * собака — домашний питомец домашний питомец — попугай собака – dog № 2. Связанная с получением нового содержания, новой...
mvrlin mvrlin  20.04.2020 14:21
Информационный объем переданных данных по некоторому каналу связи равен 640000 байтов. Определите скорость передачи данных по каналу, если время передачи составило 10 секунд....
Yulia14929 Yulia14929  20.04.2020 14:21
Выберите изменение формы представления информации: * собака — домашний питомец домашний питомец — попугай собака – dog № 2. Связанная с получением нового содержания, новой информации...
СвятаяИра СвятаяИра  20.04.2020 14:21
с маленькой задачей по информатике : Даны два числа: х и у. Если первое число больше второго, то посчитать сумму этих чисел. If then else...
stendec stendec  20.04.2020 14:22
Укажите правильность определения показателя к символу: А string* a; B char* a; C char& a; D string& a; E char a;...
akoa akoa  20.04.2020 14:23
Информатика минуты осталось...
гулнора гулнора  20.04.2020 14:23
Процесс выполнения операторов присваивания: b:=4;m:=127;s:=b∗m При выполнении оператора b:=4 в ячейку оперативной памяти компьютера с именем b заносится значение __ ; при выполнении...

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