Объяснение:
program Kvadratnoe;
var a,b,c,d,x,y1,y2: real;
begin
writeln(' Решение квадратного уравнения ');
write(' Введите а = ');
readln(a);
write(' Введите b = ');
readln(b);
write(' Введите c = ');
readln(c);
d:=SQR(b)-4*a*c; //находим дискриминант
writeln(' d = ',d);
//Проверка значения дискриминанта
if d=0 then
begin
x:=-b/2*a;
writeln(' Х = ',x);
end
else
if d>0 then
begin
y1:=(-b-SQRT(d))/2*a;
y2:=(-b+SQRT(d))/2*a;
writeln(' Х1 = ',y1,' X2 = ',y2);
end
else writeln(' Нет корней ');
end.
1)
#include <iostream>
using namespace std;
signed main() {
ios_base::sync_with_stdio(0);
cin.tie(0);
cout.tie(0);
int a[10][10];
int cur = 1;
for(int i = 0; i < 10; i++)
for(int j = 0; j < 10; j++){
a[i][j] = cur;
cur++;
}
for(int i = 0; i < 10; i++){
for(int j = 0; j < 10; j++)
cout << a[i][j] << " ";
cout << "\n";
}
}
2)
#include <iostream>
using namespace std;
signed main() {
ios_base::sync_with_stdio(0);
cin.tie(0);
cout.tie(0);
int a[5][5];
int cur = 3;
for(int i = 0; i < 5; i++)
for(int j = 0; j < 5; j++){
a[i][j] = cur;
cur+=3;
}
for(int i = 0; i < 5; i++){
for(int j = 0; j < 5; j++)
cout << a[i][j] << " ";
cout << "\n";
}
}
3)
#include <iostream>
using namespace std;
signed main() {
ios_base::sync_with_stdio(0);
cin.tie(0);
cout.tie(0);
int a[11][11];
for(int i = 1; i <= 9; i++)
for(int j = 1; j <= 9; j++)
a[i][j] = i*j;
for(int i = 1; i <= 9; i++){
for(int j = 1; j <= 9; j++)
cout << a[i][j] << " ";
cout << "\n";
}
}
uses crt;
var s:char; n:integer;
begin
clrscr;
writeln('Введите символ');
read(s);
n:=ord(s);
writeln(n);
readkey;
end.