Первая ЖИТЬ. т.к. ноль может идти только в паре с 1,2 или 3
1) C. знак плюс. 2) В. Shortint. 3) D. string. 4) судя по предложенным вариантам - C. 4, есть такой, но real, например, 8 байт. 5) А. 3,5 нельзя через запятую. 6) C. Var. 7) C. Var a,b: integer; c: real. 8) D. A:=164. 9) C. B:=6.06. 10) A. C:='Informatika'. 11) D. D:='C'.
Var a,i,k:integer;
begin
readln(a);
for i:=2 to a-1 do
if (a mod i)=0 then k:=k+1;
if k=0 then writeln('Простое')
else writeln('Сложное');
<span>end.</span>
(наверное)воспроизводит изображение на экран