Var rost :array[1..100] of integer;
n, i, k: integer;
begin
writeln('Введите общее количество участников');
readln(n);
for i:=1 to n do
read(rost[i]);
for i:=1 to n do
if (rost[i] >=180) then Inc(k);
writeln(k);
<span>end.
Пример входных данных
3
179 180 194<span>
Выходные данные
2</span></span>
Program proga;
var str1,str2,str3:string;
input:Text;
begin
Assign(input,'file.txt');
reset(input);
readln(input,str1);
readln(input,str2);
readln(input,str3);
if(length(str1)>length(str3)and length(str3)) then
writeln('1 строка самая длинная');
else if length(str2)>length(str3) and length(str1) then
writeln('2 строка самая длинная');
else if length(str3)>length(str1) and length(str2) then
writeln('3 строка самая длинная');
close(input);
end.
P.S файл со строками надо предварительно создать в папке с Exe файлом программы
<span>n = int(input('Input n '))
a = [0]*n
a[0] = int(input('Input a[0] '))
d = int(input('Input d '))
print(a[0],end=' ')
for i in range(1,n):
a[i]= a[i-1]+d
print(a[i],end=' ')
Тестовое решение:
Input n 10
Input a[0] 5
Input d 3
5 8 11 14 17 20 23 26 29 32
</span>
Держи код на С++. Если русский не пойдет или что-то еще не так – спрашивай, будем разбираться)
#include <iostream>
using namespace std;
int main () {
setlocale (0,"russian");
char c;
cin>>c;
cout <<"Символ "<<c<<" – это ";
if (c>='0' && с<='9')
cout<<"цифра.";
if (c>='a' && c<='z')
cout<<"прописная буква.";
if (c>="A" && c<="Z")
cout<<"заглавная буква.";
cout<<endl<<endl;
system ("pause");
return 0;
}
8 Мбайта = 8*1024 Кбайт = 8192 Кбайт
S1 = v*t1, S2 = v*t2
S2 = (S1/t1)*t2 = (8192/100)*25 = 2048 Кбайт
Лучший ответ пж, ведь я помог :)