По ! ) 1.значение переменной х присвоить в программе 2.при неотрицательном значении х переменной у присвоить значение,равное корню квадратному из х. 3.в противном случае,переменной у присвоить значение,равное
квадрату х. 4.вывести на экран значение х и значение у 2 1.двум произвольным переменным присвоить произвольным образом соответственно 2 числа 2.двум другим переменным присвоить значения,равным тангенсам двух
предыдущих переменных 3.вывести на экран значения всех переменных ,а так же сумму значений последних переменных.

195

317

Посмотреть ответы 2

Ответы на вопрос:

babikahenjudzao

Информатика

4,6(59 оценок)

№1.

код на языке pascalabc:

program z1; uses crt; varx,y: real; beginwriteln('введите x '); readln(x); if x> 0 then y: =sqrt(x)elsey: =sqr(x); writeln('x= ',x,'y= ',y); end.

№2.

program z2; uses crt; vara,b,a1,b1,r: real; beginwriteln('введите 1 число '); readln(a); writeln('введите 2 число '); readln(b); a1: =sin(a)/cos(a); b1: =sin(b)/cos(b); r: =a1+b1; writeln('1 число: ',a,' 2 число: ',b,' 3 переменная: ',a1); writeln(' 4 переменная: ',b1,' сумма 2 последних переменных: ',r); end.