Определите значение целочисленных переменных a и b после выполнения фрагмента программы, написанного на языке паскаль: а: =2468; b: =(a mod 100)*10; a: =a div 1000+b; а) а=242; b=240 б) а=4682; b=680; в) а=682; b=680; г) а=682; b=468 !

b = (2468/100)*10=(68(остаток))*10a = 2468/1000 + 680 = 2 + 680a = 682   b = 680 ответ: в 

Решение на c++ #include < iostream> using namespace std; int main(){    int64_t n,k,minz,maxz=0;     cin> > n> > k;     minz=(n+k-1)/k;     maxz=n-k+1;     cout< < minz< < " "< < maxz< < endl;     return 0; }решение на pascal( не проверял на правильность  ): var n, k, minz, maxz: integer; begin    readln(n, k);     minz : = (n + k - 1) div k;     maxz : = n - k + 1;     writeln( minz, maxz ); end.

#include < iostream> int main() { int a[40] = { 150, 156, 176, 164, 158, 170, 168, 163, 166, 175, 150, 156, 176, 164, 258, 270, 268, 263, 266, 275,  150, 156, 176, 164, 358, 370, 368, 363, 366, 375,  150, 156, 176, 164, 458, 470, 468, 463, 466, 475, }; int s[2] = { 0 }; for (int i = 0; i < 40; ++i){     if (a[s[0]] < a[i]) s[0] = i; else     if (a[s[1]] < a[i]) s[1] = i; } std: : cout < < "car#1: " < < s[0] < < "car#2: " < < s[1]; return 0; }