Поделитесь своими знаниями, ответьте на вопрос:
1. Наберите слово «Осень» в ячейке А5. Удалите это слово из ячейки. 2. Наберите число «585855» в ячейке В5. Скопируйте это число в ячейкуЕ8.Наберите «2017 год ноябрь месяц» в ячейке A7. Вставьте эту информа-цию полностью в ячейку В7.4. Перейдя в Лист 2, вставьте в ячейку Е10 скопированное в ячейку B7 сло-восочетание 2017 год ноябрь месяц».5. Выполните изменения в ячейках таблицы, как показано на рис. 3.12, иполучите таблицу, показанную на рис. 3.13:А) установите границы тех ячеек, где записаны данные;Б) поверните содержимое диапазона А1:01 на 45 градусов.погите
(см. объяснение)
Объяснение:
program task;
var i: integer;
const N=5;
procedure writeOut(i: integer);
begin
if(i<N) then write(', ')
else writeln('.');
end;
begin
if(N<1) then begin writeln('N>0 и целое!'); exit; end;
writeln('ЦИКЛ FOR:');
for i:= 1 to N
do begin
write(i); writeOut(i);
end;
writeln;
writeln('ЦИКЛ WHILE:');
i:= 1;
while(i<N+1)
do begin
write(i); writeOut(i);
i:= i+1;
end;
writeln;
writeln('ЦИКЛ REPEAT:');
i:= 1;
repeat
write(i); writeOut(i);
i:= i+1;
until i=N+1;
end.