profile
Опубликовано 5 лет назад по предмету Информатика от Spartak3000

Пожалуйста сделайте как можно быстрее!! Срочно надо.

1. Разработайте и напишите программу в среде посхаль согласно заданию.

а)Составить программу вычисления х по формуле x=a/b(если a и b равны нулю, выдать сообщение "множество решений", если b=0 выдать сообщение "решений нет")

  1. Ответ
    Ответ дан porludom

    program pr;

    var

    a,b:integer;

    begin

    readln(a,b);

    if (a=0) and (b=0) then writeln('множество решений')

    else if b=0 then writeln('решений нет')

    else writeln('x=',(a/b));

    end.

Самые новые вопросы