Дано двузначное целое число.напишите программу,которая выводит на экран монитора его первую цифру.
220
400
Ответы на вопрос:
Вообще-то надо самому учиться. uses crt; var k: integer; begin writeln('vvedite chislo -'); readln(k); k: =k div 10; writeln('1 cifra= ',k); end.
const n=15;
var a: array [1..n] of integer;
i,s,v: integer;
begin
writeln('массив: ');
for i: = 1 to n do
begin
a[i]: = random(90)+10;
s: =s+a[i];
write (a[i],' ')
end;
writeln;
writeln('элементы массива в обратном порядке: ');
for i: = n downto 1 do write (a[i],' ');
writeln;
v: =a[1];
a[1]: =a[n];
a[n]: =v;
writeln('поменять местами первый и последний элементы: ');
for i: = 1 to n do write (a[i],' ');
writeln;
writeln('среднее арифметическое всех элементов массива равно ',s/n: 0: 3)
end.
Популярно: Информатика
-
ВулканчикD18.02.2023 13:43
-
wwwzelenruowzl2z16.11.2020 10:14
-
Yleoliner26.05.2020 08:56
-
lanv21.04.2021 09:43
-
почта612.10.2022 07:09
-
MilkiWika11.10.2022 09:55
-
AlexSchoolLife22.05.2021 14:05
-
alamez6918.04.2020 22:41
-
Kurakik18.09.2020 10:13
-
Юліан1125.02.2021 17:59