10 класс составьте программу, позволяющую ввести фамилию, имя и отчество учащегося, разделенные пробелом, и вывести фамилию и инициалы. пример ввода: иванов сергей михайлович { строка s } пример вывода: иванов с. м. паскаль

var

str: string;

i,k: integer;

begin

write('Введите фамилию, имя и отчество: ');

readln(str);

for i:=1 to length(str) do

begin

if (str[i]<>' ')and(k=0) then

write(str[i]) else

if str[i]=' ' then

begin

inc(k);

write(' ',str[i+1],'.');

end;

end;

readln;

end.

попробуй эту программу.

Массив - структура данных, которая хранит однотипные данные, это их главное отличие от списков, так как списки могут хранить в себе разные типы данных.

Все мы ходим в магазины, примерами однотипных данных могут быть ценники (именно цена), само количество продуктов, дата производства.

Служебное слово print() выводит объекты на стандартное устройства вывода, ну короче говоря, на экран выводит какой-либо текст/переменные.

Типов данных много: Числа, списки, кортежи, множества, строки, словари, байты, логический тип, также есть тип NoneType.

В Python можно проводить все операции над числами: деление, умножение, вычитание, сложение с предназначенных для этого символов.

+ - сложение

- - вычитание

* - умножение

/ - деление

// - целочисленное деление

% - деление с остатком

** - возведение в степень

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк/столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(n,n,1,50);
  a.Println(3); Writeln(3*a.ColCount*'-');
  // начало расчетов
  var s:=0;
  for var i:=0 to n-1 do s+=a[i,n-i-1];
  Writeln('1: S=',s);
  Write('2: Суммы построчно: '); a.Rows.Select(row->row.Sum).PrintLn;
  Write('3: Произведение элементов: ');
  a.ElementsByRow.Aggregate(BigInteger(1),(p,q)->p*q).PrintLn;
  var p:BigInteger:=1;
  for var i:=0 to n-1 do p*=a[i,i];
  Writeln('4: П=',p);
end.