//Pascal
//Массив заполняется случайными числами от 1 до 10
var
A: array [1..10] of byte;
i: byte;
Sum: real;
begin
randomize;
for i := 1 to 10 do
begin
A[i] := random(9)+1;
write(A[i]:3);
Sum := Sum + A[i] + 2;
end;
writeln;
for i := 1 to 10 do writeln(Sum/sqrt(abs(A[i])):0:2);
writeln;
end.
Эти числа (17 и 47) :
Простые ,
Нечётные ,
Вторая цифра 7 .
На 4 ответа не знаю :(
5. С begin начинается непосрелствеено написание всего года. Begin переводиться как начало, т.е. начало алгоритма. Так же begin используется, если после условного оператора и опепаторов цикла требовалось выполнить несколько операций.
6. Real это тип с плавающей точкой. Например: 2.3, 4.507, 5.0 и т.д. и т.п.
7. Char это символьный тип. Например: 'd', '3', ',' и т.д. и т.п.
8. К операторам по типу write, или read добавляется оператор -ln
9. Для ввода данных используется оператор read
10. a:=b+c;
Writeln('a= ', a);
End.
Ну, если ожог незначительный, то нужно сначала подставить обоженную часть под холодную воду, а после обработать или же просто нанести мазь на повреждённый участок. Ну, а если ожог: первой, второй и т.д. степени, то сразу же ко врачу.
Надеюсь, хоть чем-то помогла.