Все категории

4 года назад

Как убрать эту ошибку?

Знания

Информатика

1 ответ:

Арзу 904 года назад

0 0

Убери 2 end который више

Читайте также

Соедини стрелками назначение программ и названия вида программ системные программы для решения задач пользователяприкладные прог

svetelena [8.7K]

Системные программы - обеспечивают работу компьютера и взаимодействие компьютера с пользователем
инструментальные программы - для разработки новых программ
прикладные программы - для решения задач пользователя

0 0

4 года назад

Расположите номера в порядке возрастания по числу пользователей компьютеров,работающих в указанных приложениях:1-текстовые редак

Bodyan3022 [7]

Г //////////////////////////////

0 0

3 года назад

Что такое информатика и что оно изучает?

Dea Aeterna

Информатика наука изучающая закономерности протекания процессов передачи,хранения и обработки информации в природе,обществе,технике,а также способы автоматизации этих процессов с помощью компьютера

0 0

4 года назад

Прочитать ещё 2 ответа

КАК НАЗЫВАЕТСЯ ШТАНГИ, БРУСЬЯ, КОЛЬЦА, КАНАТ, КОНЬ ДАЙ НАЗВАНИЯ ЭТОМУ МНОЖЕСТВУ

Наталья Журавченко

Спортивный инвентарь, советские тренажеры - выбери, как больше нравится

0 0

4 года назад

1.Ипполит задумал трёхзначное число, которое при делении на 15 даёт в остатке 11, а при делении на 11 даёт в остатке 9. Напишите

Марфа Васильевна я [7]

Var i:integer;

Begin

for i := 100 to 999 do

if (i mod 15 = 11) and (i mod 11 = 9)

then writeln(i);

End.

Var i,n,s:integer;

Begin

read (n);

s := 1;

for i := 1 to n do

s := s * i;

write(s);

End.

Var i,j,k:integer;

Begin

for i:=1 to 9 do

for j:=0 to 9 do

for k:=0 to 9 do

if i*i*i+j*j*j+k*k*k=i*100+j*10+k

then writeln(i*100+j*10+k);

End.

0 0

4 года назад