masamosijcuk140244
?>

PYTHON Написать программу (ввод с клавиатуры), которая определяет кто старше вы или ваш друг и на сколько. Входные данные: 21 13 Выходные 21 на 8

Информатика

Ответы

mez-omts-d5

age1 = int(input('Enter the age of your friend: '))

age2 = int(input('Enter your age: '))

if age1 > age2:

print(age1, f'\nна {age1-age2}')

elif age1 == age2:

print('Ваш возраст одинаковый')

else:

print(age2, f'\nна {age2-age1}')

seregina19706867
Var
    a: array [,] of integer;

begin
    var n := ReadlnInteger('n = ');
    var m := ReadlnInteger('m = ');
    var rand := ReadlnInteger('Для ручного ввода нажмите 0');
    
    if rand = 0 then begin
        a := new integer[m, n];
        for var i := 0 to m-1 do
            for var j := 0 to n-1 do
                a[i, j] := ReadlnInteger('a[' + i + ',' + j + '] = ');
    end
    else a := MatrixRandom(m, n, 1, 100);
    Println(a);
    
    var b := ArrGen(n, x -> 1);
    for var i := 0 to m-1 do
        for var j := 0 to n-1 do
            if j mod 2 = 0 then
                b[j] := b[j] * a[i, j];
    
    b.Where((x, i)-> i mod 2 = 0).SortedDescending().Println();
end.
Posadskii-Sergeevna
Const n = 5;
  m = 5;
var a:array[1..n,1..m] of integer;
i,j,s:integer;
begin
//Для теста заполним массив сл.числами
  for i:=1 to n do begin
    for j:=1 to m do begin
      a[i,j]:=random(21)-10; write(a[i,j]:4);
    end;
    writeln;writeln;
  end;
  //сумма всех элементов массива
  for i:=1 to n do
    for j:=1 to m do s:=s+a[i,j];
writeln('сумма всех элементов массива: ',s);
//сумма каждой строки
for i:=1 to n do begin
    s:=0;
    for j:=1 to m do begin
      s:=s+a[i,j];
    end;
    writeln ('Строка: ',i,' сумма:',s);
  end;   
end.

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

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

PYTHON Написать программу (ввод с клавиатуры), которая определяет кто старше вы или ваш друг и на сколько. Входные данные: 21 13 Выходные 21 на 8
Ваше имя (никнейм)*
Email*
Комментарий*

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

Екатерина
Ананян Иван1281
bulin2001
Bolshakova Shigorina
Ohokio198336
zhannasokortova
serg1976g
Stefanidi_Semeikina1896
sargisyan
akuznecov8989
ВостриковаСтародубцева1980
Burov1446
nsmirnova
ntinyakova
annakuzina2023