Вопрос по информатике:
Ввести массив H [1..5] и число А.Для каждого элемента массиа вычислить Z= корень из Ht/A.Исходный массив и результат распечатать.
- 08.05.2017 11:19
- Информатика
- remove_red_eye 4889
- thumb_up 11
Ответы и объяснения 1
Program zadacha;
uses crt;
var a, i: integer;
z: real;
h: array [1..5] of integer;
begin
clrscr;
write ('vvedite chislo A: ');
readln (a);
for i:=1 to 5 do begin
write ('vvedite elemeny massiva H: ');
readln (h[i]);
z:=sqrt(h[i]/a);
writeln ('H[i]=',h[i], ' Z=', z:0:4);
end;
readkey;
end.
или
program zadacha;
uses crt;
var a, i: integer;
z: real;
h: array [1..5] of integer;
begin
clrscr;
write ('vvedite chislo A: ');
readln (a);
for i:=1 to 5 do begin
write ('vvedite elemeny massiva H: ');
readln (h[i]);
end;
for i:=1 to 5 do begin
z:=sqrt(h[i]/a);
writeln ('H[', i, ']=',h[i], ' Z=', z:0:4);
end;
readkey;
end.
- 09.05.2017 01:14
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.