1. Информатика
  2. Составить программу для вычисления

Составить программу для вычисления значения функции у(х): у= 0, если х< =0, х в квадрате, если х> 0

vovaaan1 vovaaan1    2   03.06.2019 17:40    0

Ответы
hanum27082005 hanum27082005  03.07.2020 23:20
Var x,y:integer;
begin
writeln('input x');
if x<=0 then y:=0 else y:=sqr(x);
writeln('y=',y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
gr3ygo0se gr3ygo0se  12.05.2020 09:56
Скорость передачи данных через некоторое соединение составляет 512000 бит/сек. Определите наибольший размер файла в байтах, который может быть передан через данное соединение...
EpoPanda EpoPanda  12.05.2020 09:56
Төмендегі модельді жасау үшін қолданған рет ретімен жазыныз​...
VLaDiSLaVVoRoNKoV VLaDiSLaVVoRoNKoV  03.03.2022 12:58
1. Набор данных, сохраненный в виде последовательности битов на компьютере А) Файл В) Папка С) Документ Д) Программа Е) Каталог...
dfghjkghjkl dfghjkghjkl  27.07.2019 18:10
Вставьте в каждое слово одну букву так чтобы получилось новое слово шар дар стол арка оса тело...
Mrx7777 Mrx7777  05.08.2019 11:40
Программный код на qbasic : дан массив размера n, все элементы которого, кроме первого, по возрастанию. сделать массив , переместив первый элемент на новую позицию....
baltan1978 baltan1978  29.07.2019 23:30
Запишите на языке паскаль: переменной a будет присвоено значение квадрат числа 4, переменной b-значение модуль числа -11, а переменной с-значение переменной а.(с объяснением)...
tsybizovaanya tsybizovaanya  12.07.2019 11:10
Через сколько секунд встретятся две ласточки, летящие на встречу друг другу, если скорость каждой из них 20 метров секунду,а расстояние между ними 920...
БатонБагетович БатонБагетович  12.07.2019 11:10
Какое название нового материка произошло от имени итальянского путешественника...
OMG1234567890 OMG1234567890  12.07.2019 11:10
4.раскройте скобки и подобные слагаемые: 2)а) (2+3а)+(7а-2)=? б) -(11а+-3в)=?...
ilham11997766 ilham11997766  12.07.2019 11:10
Почему астрономы не могут назвать точное число звёзд во вселенной? как вы думаете почему в настоящее время считают, что у космического пространства нет границ? возможен ли...

Популярные вопросы