Uses crt; var i,j: integer; f: array[1..8] of string; p: array[1..5] of string; otm: array[1..8,1..5] of integer; sbu: array[1..8] of real; sbp: array[1..5] of real; begin // ввод фамилий с клавиатуры writeln('введите 8 фамилий: '); for i: =1 to 8 do begin write(i,'-я фамилия ='); readln(f[i]); end; // закончен ввод фамилий // ввод предметов с клавиатуры writeln('введите 5 предметов: '); for i: =1 to 5 do begin write(i,'-й предмет ='); readln(p[i]); end; // закончен ввод предметов // выставление случайных оценок от 2 до 5 randomize; for i: =1 to 8 do for j: =1 to 5 do otm[i,j]: =random(4)+2; // закончено выставление оценок по пяти предметам для восьми уч-ся // вывод на экран табеля успеваемости write('фамилия': 10); for i: =1 to 5 do write (p[i]: 10); writeln; for i: =1 to 8 do begin write(f[i]: 10); for j: =1 to 5 do write(otm[i,j]: 10); writeln; end; end. {авторы программы} // на тройку: в итоговой таблице выводить sbu и sbp // на четверку: сколько человек без двоек и троек? сделайте на тройку и на четвёрку
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
int r = 0, k = 0, t = 0;
const int N = 50;
char array[N];
cin.getline(array, N);
for (int i = 0; array[i]; i++)
{
if (array[i] == 'r')
{
r++;
}
if (array[i] == 'k')
{
k++;
}
if (array[i] == 't')
{
t++;
}
}
cout << "r = " << r << endl;
cout << "k = " << k << endl;
cout << "t = " << t << endl;
return 0;
}
ө мен Бахтыбай Абылай хан атындағы қазақ ұлттық университетінің журналистика факультетін бітірген қазақ халқының саны жөнінен де бар білгені жөн бе әлде қоладан ба не истеп калайсындар мен Бахтыбай Абылай хан атындағы қазақ ұлттық университетінің журналистика факультетін бітірген қазақ халқының саны жөнінен де бар білгені жөн бе әлде қоладан ба не истеп калайсындар мен Бахтыбай Абылай хан атындағы қазақ ұлттық университетінің журналистика факультетін бітірген қазақ халқының саны жөнінен де бар білгені жөн бе әлде қоладан ба не истеп