Запись на языке Pascal полного ветвления аааа.очень очень нужно:*в интернете не могу найти(
Запись на языке Pascal полного ветвления аааа.очень очень нужно:*в интернете не могу найти(
Гость
Ответ(ы) на вопрос:
Гостьprogram w; uses crt; var A:real; begin clrscr; write ('Введите число A: '); readln (A); if A>=0 then writeln ('Вы ввели положительное число'); readln end.
Не нашли ответ?
Похожие вопросы