1. #include <iostream> //если не отображается, пиши после include - iostream в <> using namespace std;
int main(){ for(int i=0;i<10;i++) cout<<"Hello World"; cin.get(); cin.get(); return 0; } 11. #include <iostream> //если не отображается, пиши после include - iostream в <> #include <string> //если не отображается, пиши после include - string в <> using namespace std; int main() { string s,p; cin>>s; cin>>p; if((p!="v") && (p!="g")) return 66; int n; cin>>n; if (p=="g"){ for(int i=0;i<n;i++) cout<<s; } else { for(int i=0;i<n;i++) cout<<s<<"\n"; } cin.get(); cin.get(); return 0; }
Карен
24.05.2022
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016 begin var m,n:integer; Write('Количество строк и столбцов матрицы: '); Read(n,m); var a:=MatrixRandom(n,m,10,99); for var i:=0 to n-1 do begin for var j:=0 to m-1 do Print(a[i,j]); Writeln end; var p:=ReadInteger('Введите число Р:'); var b:array of integer; SetLength(b,4*m); var k:=0; for var i:=n-p to n-1 do for var j:=0 to m-1 do if a[i,j] mod 4=0 then begin b[k]:=a[i,j]; Inc(k) end; SetLength(b,k); b.Print end.
1кБ = 1024 Б,
значит 7кБ = 7 * 1024Б = 7168 Байт
Объяснение: