Загадка про диск (если можно сочините сами)

Знания

Информатика

1 ответ:

bodylai3 года назад

0 0

Он круглый блестящий на пластинку похож поставишь в устройство покажет все что угодно

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

Дано слово. Записать каждый символ по два раза. Формат ввода: s - слово Формат вывода: s1 - новое слово Пример ввода: дождь П

Вячеслав2626 [37]

Var s,s1:string;
i:integer;
begin
write('Введите слово: ');
readln(s);
s1:='';
for i:=1 to length(s) do s1:=s1+s[i]+s[i];
writeln(s1);
end.

Пример:
Введите слово: дождь
ддоожжддьь

0 0

3 года назад

Заполнить одномерный массив из 20 элементов случайными числами от -10 до 20 и вывести на экран

999Сергей999 [15]

const n=20;

var a:array[1..n] of integer;

i:integer;

begin

for i:=1 to n do

begin

a[i]:=random(31)-10;

write(a[i]:4);

end;

end.

Пример:

7 8 12 16 8 16 6 16 3 9 10 1 3 -1 17 -9 19 -2 1 4

0 0

4 года назад

Найдите минимальное из двух чисел a и b,

ronaldO007

Var a,b,c: integer;
begin clrscr;
write('Надо написать 1 число'); read(a);
write('Надо написать 2 число'); read(b);
if a<b then write('c=',a) else write('c=',b);
end.

0 0

4 года назад

Как в паскале ABC создать программу с var integer чтобы он выводил возраст кота и собаки 6класс.Заранее спасибо

Сергей2288721346

А где условие самой задачи-то?

LoL

0 0

4 года назад

Какой цвет будет иметь точка на экране при падении на неё красного и синего цветов

rnekrov

Будет лиловый цвет.

0 0

1 год назад

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