program summa;
var
x, y:real;
begin
writeln('Введите вещественные числа');
read(x,y);
writeln('их сумма: ', x+y);
writeln('их разность: ', x-y);
writeln('их произведение: ', x*y);
writeln('их частное: ', x/y:0:2);
end.
1) 12(в16с/c) =1*16 +2 = 18 (в 10c/c)
12( в 8с/с) = 1*8+2 =10 (в 10с/с)
10 (в 2 с/с) = 2 ( в 10с/с)
18+10*2 = 38 (в 10с/с)
38(в10с/с) = 46(в 8с/с) = 100 110 (в 2с/с) = 26 (в 16с/с)
2) ошибка в записи 4) , в 7с/с нет цифры 7 ( а есть 0 1 2 3 4 5 6 )
<span>program Metka;
\\ Даем имя метке
label M1;
</span>
<span><span>\\ Даем имя переменной х
</span>var x: shortint;
</span>
<span><span>\\ Начало программы
</span>begin
</span>
<span><span>\\ Выводим текст с просьбой ввода числа
</span>M1:writeln ('Введите x>100');
</span>
<span><span>\\ Запрос на ввод числа
</span>readln(x);
</span>
<span><span>\\ Если введенное число <=100 то идем на М1
</span>if x<=100 then GOTO M1
</span>
<span><span>\\ Конец программы
</span>end.</span>
Два недочета
1) нет точки с запятой после <span>writeln ('x>100')
2) Неверное условие - должно быть <=, т.к. при х=100 условие х>100 не должно выполняться.
</span>3) Желательно попросить ввести х>100 - слово Введите - не лишнее
#include <cstdlib>
#include <iostream>
#include <ctime>
#include <math.h>
using namespace std;
int main(int argc, char *argv[])
{
int n;
cin >>n;
int *a=new int[n]; /*Динамический массив из n элементов*/
srand(time(0));
double r=0;
for(int i=0;i<n; ++i)
{
a[i]=rand()%38 - 5;
r+=pow((sqrt(fabs(a[i]))-a[i]),2);
}
cout <<r<<endl;
delete [] a;
system("pause");
return EXIT_SUCCESS;
}