Номер 4
program Other;
var
a,b: integer;
begin
a:=5;
b:=0;
if a = 1 then
{Next action...}
else
begin
b:=b+a;
a:=a-1;
end;
end.
Тип - (назначение, если так можно выразиться) определяет какие значения может принимать. напр. целый, вещественный,строковый,символьный,логический и др.
имя - название по которому к переменной можно обратится напр. a,b,djksghkjd4545725 )))
значение - ну э... блин это значение. напр. 123 , 878.447 , рррапорл , true
<span>uses crt;
var a: array [1..15] of integer;
i: integer;
begin
writeln('Дан массив');
for i:=1 to 15 do
begin
a[i]:=random(41)-20;
write(a[i]:5);
end;
writeln;
writeln('Преобразованный массив');
for i:=1 to 15 do
if a[i] mod 2=0 then write(a[i]/2:5:1)
else write(a[i]*3:5);
end<span>.</span></span>
1)
#include <iostream>
using namespace std;
int main()
{
int n = 0;
cin >> n;
for (int i = 0; i < n; ++i) {
cout << 2 * i << endl;
}
return 0;
}
2)
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int a = 0, b = 0;
cin >> a >> b;
for (int i = a; i <= b; ++i) {
cout << pow(i, 2) << endl;
}
return 0;
}
3)
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int a = 0, b = 0, sum = 0;
cin >> a >> b;
for (int i = a; i <= b; ++i) {
sum += pow(i, 2);
}
cout << sum << endl;
return 0;
}
Нет не верно, сообщение из 8 символов весит 16 БАЙТ информации, а не 16 БИТ