1. Информатика
  2. Напишите программу на паскале,

Напишите программу на паскале, которая находит y=a/b, когда b равен 0 и b не равен 0

vanyaburundukov vanyaburundukov    1   20.09.2019 17:30    0

Ответы
HFccv HFccv  08.10.2020 05:04
var a,b:real;
begin
readln(a,b);
if b=0 then writeln('Деление на 0')
else writeln('y = ',a/b);
end.

Пример:
5 2
y = 2.500000000000000e+00
ПОКАЗАТЬ ОТВЕТЫ
алмаз122 алмаз122  08.10.2020 05:04
Program abc;var y,a,b:real;beginreadln(a,b);y:=a/b;if b=0 then writeln('Ошибка данных')else writeln(y);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Пушка1244 Пушка1244  11.08.2019 08:30
Запишите в виде целого числа или десятичной дроби числа, представленные в экспоненциальном виде: е) 1е-4; ж) 4,87-1...
птимзшктвіал птимзшктвіал  11.08.2019 08:30
Запишите команду, которая в стилевом файле задаёт красный цвет текста для всех абзацев....
vasakaktakovlwla vasakaktakovlwla  09.03.2019 05:40
Написать программу, которая после ввода пользователем трёхзначного числа вычисляет сумму его цифр....
ааааааа59 ааааааа59  12.09.2019 19:40
Найти сумму чисел в различных системах счисления.найти сумму в 2сс чисел 1011010111 и 1101101110.перевести данные числа из 2 сс в 4 сс, 8 сс, 16 сс и найти сумму.​...
Никас111 Никас111  12.09.2019 21:30
1. заполните недостающие данные = байт = 98304бит 2. определите информационный размер текстового документа, если он записан с 256-символьного алфавита, содержит 90 символов в...
lazyseal1488 lazyseal1488  12.09.2019 21:30
Дан массив из 10 элементов. составить программу которая даёт ответ на вопрос есть ли в массиве более одного элемента равного максимальному. ответ выводится в виде да/нет. pascal....
moyutot moyutot  12.09.2019 21:30
Найти максимальную и минимальную цифры числа. верно ли, что данное число заканчивается на них? нужна программа в турбо паскаль...
пик124 пик124  12.09.2019 21:30
Составить программу в pascal которая в предложении найдет количество слов начинающиеся на к...
Файлетмер Файлетмер  12.09.2019 21:30
1)переведите в двоичную систему счисления следующие десятичные числа 34,87,213,655,817,2612,4561 и распишите как вы решали!...
Ертилеу Ертилеу  12.09.2019 21:30
Напишите программу подсчитывающая количество минимальных элементов в заданном массиве...

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