Ввести число если оно не отрицательно вычесть из него 50, в противном случае прибавить к нему 100. Решение

Ввести число если оно не отрицательно вычесть из него 50, в противном случае прибавить к нему 100. Решение
Гость
Ответ(ы) на вопрос:
Гость
var a : real; begin    readln(a);   if a>=0 then writeln(a-50) else writeln(a+100); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы