Составьте программу в Паскале. Условный оператор. Ввести число А. Начертить вертикальную линию в левой части
экрана если A<0 и в правой части экрана в противном случае. Данные A=-20 (результат в левой части), А=20 (результат в правой части).
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Валерий Альбертович
uses
graphabc; // подключаем графику.
var
a : integer; // объявляем переменную целочисленного типа.
begin
writeln('Введите число:'); // вывод строки на экран.
readln(a); // считываем значение переменной.
setpenwidth(5); // устанавливаем ширину линии.
setpencolor(clRed); // устанавливаем цвет линии.
if a < 0 then // если число отрицательное.
line(20,100,20,320) // рисуем линию.
else // если число положительное, либо 0.
line(620,100,620,320); // рисуем линию.
end.
Новые вопросы в разделе Информатика
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00