profile
Опубликовано 6 лет назад по предмету Информатика от безысходнсть

Дано целое число.Написать программу которая заменяет его на 0, если число отрицательное и выводит его без изменений в пративном случае.

  1. Ответ
    Ответ дан jstilvo
    В паскале АВС выглядит так:
    program dz;
    var a:integer;
    begin
    readln (a);
    if a<0 then a:=0;
    writeln (a);
    end.
Самые новые вопросы