Составьте алгоритм вычисления квадратного корня из введенного числа в виде блок-схемы в Конструкторе блок-схем и запишите его на алгоритмическом языке. Проверьте работо созданной блок-схемы для трех вариантов чисел.
Написал на C# но в принципе код очень простой поэтому сможешь переписать на любой язык)
Console.WriteLine("Введите А"); int a = Convert.ToInt16(Console.ReadLine()); if (a >0) { Console.WriteLine("---------------------------"); Console.WriteLine("Число "+a+" положительное"); } if (a < 0) { Console.WriteLine("---------------------------"); Console.WriteLine("Число " + a + " отрицательное"); } if (a == 0) { Console.WriteLine("---------------------------"); Console.WriteLine("Вы ввели 0"); } Console.ReadLine();
Var i:integer; t:array[1..3,0..31]of real; begin write('Введите температуру в декабре по дням: '); for i:=1 to 31 do begin readln(t[1,i]); t[1,0]:=t[1,0]+t[1,i]; end; t[1,0]:=t[1,0]/31; write('Введите температуру в январе по дням: '); for i:=1 to 31 do begin readln(t[2,i]); t[2,0]:=t[2,0]+t[2,i]; end; t[2,0]:=t[2,0]/31; write('Введите температуру в феврале по дням: '); for i:=1 to 28 do begin readln(t[3,i]); t[3,0]:=t[3,0]+t[3,i]; end; t[3,0]:=t[3,0]/28; writeln('Средняя температура в декабре: ',t[1,0]); writeln('Средняя температура в январе: ',t[2,0]); writeln('Средняя температура в феврале: ',t[3,0]); writeln('Средняя температура зимой: ',(t[1,0]+t[2,0]+t[3,0])/3); end.
Console.WriteLine("Введите А");
int a = Convert.ToInt16(Console.ReadLine());
if (a >0)
{ Console.WriteLine("---------------------------");
Console.WriteLine("Число "+a+" положительное"); }
if (a < 0) { Console.WriteLine("---------------------------");
Console.WriteLine("Число " + a + " отрицательное"); }
if (a == 0) { Console.WriteLine("---------------------------");
Console.WriteLine("Вы ввели 0"); }
Console.ReadLine();
i:integer;
t:array[1..3,0..31]of real;
begin
write('Введите температуру в декабре по дням: ');
for i:=1 to 31 do
begin
readln(t[1,i]);
t[1,0]:=t[1,0]+t[1,i];
end;
t[1,0]:=t[1,0]/31;
write('Введите температуру в январе по дням: ');
for i:=1 to 31 do
begin
readln(t[2,i]);
t[2,0]:=t[2,0]+t[2,i];
end;
t[2,0]:=t[2,0]/31;
write('Введите температуру в феврале по дням: ');
for i:=1 to 28 do
begin
readln(t[3,i]);
t[3,0]:=t[3,0]+t[3,i];
end;
t[3,0]:=t[3,0]/28;
writeln('Средняя температура в декабре: ',t[1,0]);
writeln('Средняя температура в январе: ',t[2,0]);
writeln('Средняя температура в феврале: ',t[3,0]);
writeln('Средняя температура зимой: ',(t[1,0]+t[2,0]+t[3,0])/3);
end.