ekb676
?>

Дано целое число n (1 ≤ n ≤ 26 вывести n последних строчных (то есть маленьких) букв латинского алфавита в обратном порядке, начиная с буквы z. (код последней прописной латинской буквы z равен 122).

Информатика

Ответы

alex091177443
Плохо понел , но думою uses crt; var i,n: integer; begin writeln('введите  n'); read(n); i: =122; while i > 96+n do begin write(' ',chr(i)); i: =i-1; end; end.
dima0218687
Pascal 1. var a, b: real; begin   write('введите стороны прямоугольника: ');   read(a, b);   writeln('периметр = ', 2 * a + 2 * b);   end. 2. var p, b: real; begin   write('введите два числа: ');   read(p, b);   writeln('произведение = ', p * b);   writeln('разность = ', p - b); end. 3. var b: real; begin   write('введите длину ребра: ');   read(b);   writeln('объем = ', b * b * b); end. 4. var r: real; begin   write('введите радиус: ');   read(r);   writeln('площадь = ', 3.14 * r * r); end. 5. var a, b, c: real; begin   write('введите три стороны: ');   read(a, b, c);   writeln('периметр = ', a + b + c); end.
elenakarpova709
Var a : array [1..4, 1..4] of integer ; i,j, p,k: integer ; begin   randomize;   k: =1; p: =1;   for i: =1 to 4 do   begin       for j: =1 to 4 do       begin           a[i,j]: =random (100);           if a[i,j]> a[k,p] then           begin               k: =i;               p: =j;           end;           write(a[i,j]: 3);       end;       writeln;   end;     writeln ('максимальный элемент матрицы = ', a[k,p]);   write ('он находится в строке №' , k);   writeln (' и в столбце №' , p);   writeln('меняем максимальный элемент матрицы и первый элемент первой строки: ');   i: =a[k,p];   a[k,p]: =a[1,1];   a[1,1]: =i;   for i: =1 to 4 do   begin       for j: =1 to 4 do write(a[i,j]: 3);       writeln;   end; end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Дано целое число n (1 ≤ n ≤ 26 вывести n последних строчных (то есть маленьких) букв латинского алфавита в обратном порядке, начиная с буквы z. (код последней прописной латинской буквы z равен 122).
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

o-pavlova-8635
ikuvila5484
heodbxbbshe
gavrilasmax05
textildlavas21
fouettearoma
SEMENOV25352
LIN1022
Семеновна-Павел
monenko
Диана820
marvindkc
Valentina
sssashago8
Anatolevich_Kulikov1229