Статья, набранная на компьютере, содержит 16 страниц, на каждой странице 32 строк, в каждой строке 25символа. определите информационный объём статьи в одной из кодировок unicode, в которой каждый символ кодируется 16 битами.
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
begin Writeln('*TEST*'); randomize; answer:=10; k:=0; for i:=1 to answer do begin x:=Random(9)+1; y:=Random(9)+1; Write(x,' * ',y,' = '); Readln(input); if input=x*y then begin k:=k+1; writeln('RIGHT!'); end else writeln('WRONG! ',x,' * ',y,' = ',x*y); end;
Writeln('Correct answers - ',k); case answer of 10:Writeln('Excellent!'); 9,8:Writeln('Good!'); 6,7:Writeln('OK!'); 0..5:Writeln('Bad!'); end; end.