1определить значение переменной s после выполнения следующих команд: s: =1; n: =3; for i: =1 to n do s: =s+i*i. 2что выведется на экран в результате выполнения фрагмента программы: s: =0; for j: =10 to 15 do begin s: =s+2*j; write(s) end. 3 что выведется на экран в результате выполнения фрагмента программы: p: =1; for k: =5 downto 1 do begin p: =p*k; end; write(p).

1: Ну-с,  три раза циклом идем начиная с 1 до 3 и получается следующее:
    Идем первый раз: S:=1+1*1 в результате S = 2;
    Идем второй раз: S:=2+2*2 в результате S = 6;
    Идем третий раз: S:=6+3*3 в результате S = 15;
    ответ: S = 15;
2: В результате выполнения программы будет выведены 6 чисел которые получились в результате вычисления s:=s+2*j;
Т.е. как и в предыдущем задание (1) идем циклом с  10 до 15 и считаем, а после сразу выводим.
    S:= 0 + 2*10; S=20;
    S:= 20 + 2*11; S=42;
    S:= 42 + 2*12; S=66;
    S:= 66+2*13; S=92;
    S:=92+2*14; S= 120;
    S:=120 + 2*15; S=150;
3: крч все тоже самое цикл и т.д.
ответ: 5 20 60 120 120