1. Давайте вспомним, для чего предназначен текстовый редактор. 2. С каких клавиш можно переключить клавиатуру с английского языка на русский и наоборот?
3. Какая клавиша нам начать печатать текст с новой строки?
4. Если ты ошибся, какая клавиша удалить неверный символ?
5. Как выделить слово или часть текста?
6. Как напечатать заглавную букву?

1. Давайте вспомним, для чего предназначен текстовый редактор.
2. С каких клавиш можно переключить клавиатуру с английского языка на русский и наоборот?
3. Какая клавиша нам начать печатать текст с новой строки?
4. Если ты ошибся, какая клавиша удалить неверный символ?
5. Как выделить слово или часть текста?
6. Как напечатать заглавную букву?

а)

var

    p,d,h: real;

begin

    readln(h);

    p: =1200*9.8*h;

    writeln(p);

end.

б)

var

    m,h,r: real;

begin

    readln(h);

    readln(r);

    m: =1200*3.14*h*r*r;

    writeln(m);

end;

в) необходимы дополнительные условия количество сосудов

если принять количество сосудов за k тогда

var

    i,k: integer;

    m,h,r,s: real;

begin

    readln(k);

    s: =0;

    for i: =1 to k do

    begin

            readln(h);

            readln(r);

            m: =1200*3.14*h*r*r;

            s: =s+m;

    end;

    writeln(s);

end.

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.