Peshkov
?>

Здравствуйте решить информатику. До вечера.

Информатика

Ответы

Vyacheslavovich Mikhailovich1421

#include <iostream> // header input/output streams

#include <fstream> // header для работы с файлами

using std::ifstream; // для работы с файлом input.txt

using std::ofstream; // для работы с файлом output.txt

using std::cin; // для работы cin

using std::cout; // для работы cout

using std::endl; // для работы перевода на новую строку endl

int main(){

ifstream in_file;

  ofstream out_file;

   try{

     in_file.open("input.txt");

     out_file.open("output.txt");

   }

  catch(std::exception& e){

     cout << e.what() << endl;

   }

  unsigned int a,b;

  in_file >> a >> b;

  unsigned int sum = a+b -1;

cout << sum;

  out_file << sum - a << ' ' << sum-b << endl;

}

Dimston134877

program matrica;

const k=10;

type vector=array[1..k]o byte; masiv=aray[1..k] o vector;

var b:masiv;

procedure vved(n:byte; var a masiv);

var i,j:byte;

begin

randomize;

for i:=1 to n do

for j:=1 to n do

a[i,j]:=0;

for j:=round(n/2) to n do

for i:=n-j+1 to j do

a[i,j]:=random(255);

end;

proceure vuvid(n:byte;:masiv);

var i,j:byte;

begin

for i:=1 to  do

begin

for j:=1 to n do

write(a[i,j]:5);

riteln;

end;

end;

procedure rahnok(n:byte; a:masiv);

var i,j:byte; s,l:byte;

begin

l:=0;

for j:=1 to round(n/2) do

for i:=j to (n-j+1) do

if (a[i,j] mod 2=0) then l:=l+1;

writeln('kilkist=' l);

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

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

Здравствуйте решить информатику. До вечера.
Ваше имя (никнейм)*
Email*
Комментарий*

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

ivanovk3599
Mamikin
avolodyaev
Елена-Семенова
решить к/р по информатике ​
Алла14
mishink535
ALLA1868
savenko0109152
vetrov1
Диана820
natachi
david-arustamyan1
Герасимова107
SVETLANAluiza1534
platonovkosty