Регистрация
Войти
Стать экспертом Правила
Информатика

Срочно!!!! Даю 30 ПоинтовПобудувати алгоритм розв’язування задачі:Дано дійсні а і b. Якщо а – більше числа 100, то знайти суму чисел, якщо а – менше 100, то знайти добуток чисел, а якщо а=100, то знайти частку а/b.

ОТВЕТЫ

var a,b:integer;

begin

  writeln('Введите a: ');

 readln(a);

  writeln('Введите b: ');

 readln(b);

 if a >100 then writeln('Сумма чисел: ', a +b)

 else

  writeln('Частное чисел: ', a/b)

end.

465
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам