Ответы на вопрос:
Program w; uses crt; var a: real; begin clrscr; write ('введите число a: '); readln (a); if a> =0 then writeln ('вы ввели положительное число'); readln end.
Популярно: Информатика
-
Перевести число а10= 664 в двоичную, восьмеричную шестнадцатеричную систему...
алина375915.10.2021 19:18 -
Информатика 7 классУкажите для каждого графического изображения тип соответствующего...
kim20108.01.2021 21:06 -
Информатика,лень делать.Номера 2,3 и 4 Дал бы больше,но только Налог 50...
зынзын24.10.2022 13:21 -
1какими свойствами обладает память человека чем отличается память человека...
stebone09.11.2020 04:52 -
что такое тест? 1. программа, входе написания которой допущена ошибка...
Mariyam00527.02.2022 01:26 -
3D модельдеу программасынын атауы калай?...
oipoop5417.08.2021 18:54 -
50 БАЛЛОВ ♥️♥️♥️ заранее...
nikitafonarik0525.03.2021 09:24 -
При плане 35 частей в день рабочий сделал 42 части. На сколько процентов...
solokha2424.12.2022 23:06 -
Площадь прямоугольника 1 600 кв см, а его ширина равна 20 см. Вычис- ли...
adrianaartus821.11.2021 05:35 -
Махамбеттің соңғы сөзі эссе...
Alena26vl22.03.2023 16:56