Program program1;
var
x, y: real;
begin
writeln('Введите X: ');
readln(x);
y := x * 2 + 3;
writeln('y = ', y);
end.
Сделай её в программе, в которой вам сказал учитель, нажми в меню программы файл, потом нажми сохранить как и выбери место (флешку), где нужно сохранить файл
===== PascalABC.NET =====
begin
var (n, m) := ReadInteger2('Введите n и m:');
var a := MatrRandom(n, m, -99, 99);
a.Println(6);
a.Transform(p -> p * p);
Writeln;
a.Println(6)
end.
Var
a, h:integer;
Begin
write('Основание параллелограмма: ');
readln(a);
write('Высота параллелограмма: ');
readln(h);
writeln('Площадь параллелограмма: ', a*h);
end.
1) E) логический
2) <span>C) иерархическая, сетевая, реляционная, объектно-ориентированная;
3) </span><span>D) sqr(x)+sqr(y)<=sqr(R);
4) </span><span>B) (x>=0)or(y>=0);
5) </span><span>A) 10; (А =9 В=1 C=0)</span>