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

4 года назад

Написать программу, которая вводит слово, а затем выводит его по одному символу в строке. Пример: ПРИВЕТ

Знания

Информатика

1 ответ:

xxxEVGENIY4 года назад

0 0

var s: string;

i: integer;

begin

readln(s);

for i:=1 to length(s) do writeln(s[i]);

end.

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

Рассказ, набранный на компьютере, содержит 2 страницы, на каждой странице 60 строк, в каждой строке 64 символа. Определите инфор

Константин14

2×60×64×8=61440 бит
61440÷8=7680 байт

0 0

4 года назад

В каком из условных операторов допущена ошибка? а)if b=0 then print "Деление невозможно" б)if a в)a>b then max=a else max=b г

Екатерина Косова [131]

A) функция print не имеет ()
б) Ошибка, нет српвнения, нет then
в) нет if, ошибка
г) ошибка в теле условия( ошибка в присваивании )

0 0

4 года назад

СрОчНо ПОМОГИТЕ ЧТО ДЕЛАТЬ ПРИ ВКЛЮЧЕНИИ ВЫСКАКИВАЕТ А КЛАВИАТУРА НЕ РАБОТАЕТ

roma97

нажми на f8 и тебе поможет

0 0

4 года назад

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

Дан массив чисел От А До Б вывести в порядке уменьшения используя процедуру и рекурсию.(Паскаль)

arkadii

var a: integer;

procedure row(n:integer);

begin

if n>=1 then begin

write (n, ' ');

row(n-1)

end;

begin

readln(a);

row(a);

end.

0 0

3 года назад

Найдите произведение четных чисел, не привыкающих заданное натуральное число(N)

Tomasik [729]

Var n,i,p:integer;
begin
p:=1;
readln(n);
for i:=1 to n do
if i mod 2 = 0 then k:=k*i;
writeln(k);
end.

0 0

4 года назад

Написать программу, которая вводит слово, а затем выводит его по одному символу в строке. Пример: ПРИВЕТ​

Написать программу, которая вводит слово, а затем выводит его по одному символу в строке. Пример: ПРИВЕТ