1) Переменной является: m:real;
j:integer;
п=55;
Ф:real;
2) Дано описание переменных. Выбери верные ответы.

var
int1, int2: integer;
y:string ;
F: char;
begin
...
Имена переменных
Типы данных
3) Запиши выражение h+sq в виде пригодном для использования в программе:

h+sq
все ответы верные
(h+s)÷q
(h+s)/q

program p;

var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end. 

папирусы хранили в виде свитков, сворачивая длинную папирусную ленту, склеенную из отдельных листов, в трубку. 

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.

qbasic

screen 7

input x

input y

input c

s=x+y/2*c

print "x+y/2*c="; s

end