Такие записи есть: 7, 8

Запись на <14:00 – 1, 2, 3, 4, 5, 6
Запись на > «Пятница» – 6, 7, 8

Ответ: 1) 7, 8
________________

БУДУ БЛАГОДАРЕН ЗА ВЫБОР 'КАК ЛУЧШИЙ'

0 0

4 года назад

составьте программу которая заполняет массив а [1..20] случайными целыми числами в диапазоне от 1 до 10 и находит среднее арифме

LankySage

var a:array[1..20] of integer; i,arf,k:integer;

begin
k:=0;
for i:=1 to 20 do
begin
a[i]:=random(10);
if (a[i]/2=a[i] div 2) or (i/2<>i div 2) then
begin arf:=arf+a[i]; inc(k); end;
end;
arf:=round(arf/k);
for i:=1 to 20 do writeln('a[',i,']= ',a[i]);
writeln('Srendee arirfm. chentix chisel u nechetnix indexov = ',arf);
readln;
end.

0 0

4 года назад

20 баллов! Чертёжнику был дан для исполнения следующий алгоритм: Сместиться на (-1;1)Повтори 4 раза Сместиться на (3, 1)Сместит

vasa2541

1. (3+0-1; 1+3+4)=(2;7)
2. 4*(2;7)=(8;28)
3.(8-1; 28+1)=(7;29)
Ответ: 2

0 0

4 года назад

Составьте программу для решения задачи с5 из встроенного задачника. ПАСКАЛЬ Рисунок на фото!

Максим Никифоров

Ответ:

uses Robot;

begin

Task('c5');

while freefromright do

begin

paint;

right;

down

end

end.

0 0

4 года назад