1. Информатика
  2. Сделать программу abcpascal

Сделать программу abcpascal даны 2 числа если оба числа отрицательные то найти корень из деления иначе увеличить первое в 3 раза а второе на 7

udinaaa udinaaa    1   29.09.2019 16:01    3

Ответы
маша3057 маша3057  02.09.2020 10:29

var a,b : real;

begin

read(a,b);

if (a<0) and (b<0) then Writeln(sqrt(a/b)) else  

Writeln(a*3,' ',b+7);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kamila7811 Kamila7811  08.09.2019 09:20
Объясните возможности антивирусных программ...
какахааа какахааа  08.09.2019 09:10
Сообщение,записанное буквами из 32-х символов алфавита,содержит 80 символов.какой объём информации оно несёт ?...
zhjdjq2005 zhjdjq2005  07.05.2020 12:45
Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=1; k:=0; while k 13 do begin s:=s+2*k; k:=k+4; end; write(s+k);...
AngreilKyzmun AngreilKyzmun  07.05.2020 12:45
Файл storm.jpeg был выложен в интернете по адресу http://months.info/storm.jpeg. Потом на этом сайте создали подкаталог may и файл переместили в этот подкаталог. Укажите...
nikitabeg nikitabeg  01.06.2019 20:10
ответить на тест 1.в ячейку введены символы сумм(g4: h5).как excel воспримет эту информацию? а))текст б))число 2.в ячейки f6,f7,g6,g7 введены соответств.числа: 10,3,4,2..в...
abart abart  30.07.2019 22:40
Впаскаль. дано слово. перемешать все буквы в слове случайным образом....
аноним12345567808 аноним12345567808  30.07.2019 22:40
Вычислить и распечатать значение функции z = x^k/k^2, большие e если k = 1,2,...
oxanabondarenkozv5l4 oxanabondarenkozv5l4  30.07.2019 22:40
Как сделать люстру и поместить в нее эту лампочку в паскале? uses crt,graphabc; procedure drawlamp(state: boolean); begin setfontsize(20); if state = true then begin...
dizendorfsergei007 dizendorfsergei007  25.05.2019 00:30
Цветное (с палитрой из 65536 цветов) растровое графическое изображение имеет размер 15х15 точек. какойинформационный объем имеет изображение...
danilchirkov0 danilchirkov0  25.05.2019 00:30
Мать имеет пять дочерей, разница между ними 2 года, начиная с 5 лет, на свой день рождения каждая дочь получает столько книг, сколько ей лет. сколько в библиотеке будет...

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