Мне кажется 7 из 15 магазина...
Задание 1:
Var n,i:integer;
begin
readln(n);
for i:=1 to n do
write(i,',');
writeln;
<span>end.
Задание 2:
Var n,i:integer;
begin
readln(n);
for i:=n to 1 do
write(i,',');
writeln;
<span>end.
Задание 3:
Var n,k,i:integer;
begin
writeln('Введите N');
readln(n);
writeln('Введите K');
readln(k);
for i:=1 to n do
write(k,',');
writeln;
<span>end.
<u>Научитесь наконец писать разборчиво задания! Ничего не понятно!!!</u></span></span></span>
#include <iostream>
#include <math.h>
using namespace std;
int main() {
cout.precision(10);
double x, y, z;
cin >> x >> y >> z;
if (x>=0) cout << sqrt(x) << " ";
if (y>=0) cout << sqrt(y) << " ";
if (z>=0) cout << sqrt(z);
return 0;
}
Подставим в блок-схему вместо х число 5. В блоке условия получим выражение 5>18? Это выражение ложно, поэтому выполнение задачи будет дальше по ветке "нет". В вычислительном блоке х примет такое значение:
х=2*5+1=10+1=11
следующий блок изменяет значение х
х=2*11=22
ответ: переменная х примет значение 22
на Pascal фрагмент этого алгоритма будет выглядеть так:
F X<18 THEN BEGIN
X:=2*X+1;
X:=2*X;
END
ELSE
X:=7-5*X
END;
<span>В указанном выражении h+ah⋅n−4 вообще нет знака деления и по идее в программе это выражение будет иметь вид h+a*h*n-4.
Учитывая список приложенных ответов, то верной является запись № 2: (h+a)/(h*n-4).</span>