Перевести из C++ в Pascal: 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include

int main()
{
int a = 30, b = 3, c = 1;
std::cout << a / b << std::endl; // для сравнения

while ( a > b )
{
a -= b;
c++;
}
std::cout << c << std::endl;
return 0;
}

Question

Информатика: Перевести из C++ в Pascal: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 #include int main() { int a = 30, b = 3, c = 1; std::cout a / b std::endl; // для сравнения while ( a b ) { a -= b; c++; } std::cout c std::endl; return 0; }

артем200412прков · Accepted Answer

cd ~mkdir folder1cd folder1touch file1touch file2touch file3touch file4tar cvf archive.tar *mkdir ../folder2cd ../folder2touch new_filecp ../folder1/archive.tar .tar rvf archive.tar new_filetar vf archive.tar --delete file3tar vf archive.tar --list list1tar vf ../folder1/archive.tar --list list2diff list1 list2#Разъединение выполнить не получится, потому что все файлы пустые, но если засовывать не пустые, тоsplit -b 10M archive.tar part # вместо 10M нужный размерcat part* joined_archive.tartar vf...

Перевести из C++ в Pascal: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 #include int main() { int a = 30, b = 3, c = 1; std::cout << a / b << std::endl; // для сравнения while ( a > b ) { a -= b; c++; } std::cout << c << std::endl; return 0; }

MOGZ ответил

Перевести из C++ в Pascal: 1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include

int main()
{
int a = 30, b = 3, c = 1;
std::cout << a / b << std::endl; // для сравнения

while ( a > b )
{
a -= b;
c++;
}
std::cout << c << std::endl;
return 0;
}