Запишите значение переменной s, полученное в результате работы следующей программы.
program Pr9;
var s, k: integer;
begin
s:=0;
for k:=3 to 7 do
s:=s+6;
write (‘s=”,s)
end
2.Составить программу на языке паскаль. Дано целое число x. Если x – отрицательное, то вычислить x2 , если x – положительное, то вычислить √.

Vladijad Vladijad    2   05.05.2020 20:42    0

Ответы
valeryanka97 valeryanka97  14.10.2020 07:49

1) S=30;

2)

var x: integer;

begin

readln(x);

if x>=0

then writeln(sqrt(x):0:2)

else writeln(sqr(x));

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика