21211
25•3=75 75-5=70 70•3=210 210-5-5=200
const N = 12;
const lim = 65535;
var array1: array [1..N] of real;
i: integer;
begin
randomize;
for i:=1 to N do begin
array1[i]:= random(-lim, lim) * 2;
writeln(array1[i]);
end
end.
Английский алфавит нужно вспомнить! ...EFGHIJKLMNOPQRS...
В формуле =(K$12+S42)*5 используется относительная (S42) и смешанная (K$12) адресация. Ячейка M8 расположена на 3 строки ниже и на 3 столбца левее ячейки P5, значит адрес K$12 был получен из адреса H$12, а адрес S42 - из адреса P45.
Итак, в ячейке M8 была формула =(H$12+P45)*5
*****************C case*****************
Var
a:integer;
<span>Begin </span>
<span> Write('Введите число от 5 до 9: '); readln(a); </span>
<span> case a of </span>
5:writeln('Вы ввели число "пять"');
6:writeln('Вы ввели число "шесть"');
7:writeln('Вы ввели число "семь"');
8:writeln('Вы ввели число "восемь"');
9:writeln('Вы ввели число "девять"')
end;
readln
End.
*****************С if*****************
Var
a:integer;
Begin
Write('Введите число от 5 до 9: '); readln(a);
if a=5 then writeln('Вы ввели число "пять"');
if a=6 then writeln('Вы ввели число "шесть"');
if a=7 then writeln('Вы ввели число "семь"');
if a=8 then writeln('Вы ввели число "восемь"');
if a=9 then writeln('Вы ввели число "девять"');
readln
<span>End.</span>