<span>выберите шаблон , позволяющий правильно объединить все файлы имя которых заканчивается буквосочетанием "фы" и имеющих расширение из двух символов ,в одну группу ?
</span>
ответ б)<span>*фы.??</span>
Var n,p,k,s,i:integer;
begin
writeln(n);
readln(n);
writeln(p);
readln(p);
s:=0;
for i:=1 to n do
begin
writeln('введи число');
readln(k);
if (k mod p =0) then s:=s+1;
end;
writeln('ответ ',s);<span>
end.</span>
1) Сейчас сделаю остальное.
Program arifm;Var a, b, c, d, ar:real;beginwriteln('Введите первое число');readln(a);writeln('Введите второе число');readln(b);writeln('Введите третье число');readln(c);writeln('Введите четвертое число');readln(d);ar:=(a+b+c+d)/4;writeln('Ответ:',ar);end.
Procedure maxminsum(a,b,c:real);
var
sum,max,min:real;
begin
if (a>b) and (a>c) then max:=a;
if (b>a) and (b>c) then max:=b;
if (c>b) and (c>a) then max:=c;
if (a<b) and (a<c) then min:=a;
if (b<a) and (b<c) then min:=b;
if (c<b) and (c<a) then min:=c;
sum:=a+b+c;
writeln('max = ',max);
writeln('min = ',min);
writeln('sum = ',sum);
end;
var a,b,c:real;
begin
readln(a,b,c);
maxminsum(a,b,c);
<span>end.</span>
#include <iostream>
using namespace std;
int main ()
{
long long m,l,a[100000],n = 0;
cin >> m >> l;
while (cin >> a[n])
n++;
for (int i = 0; i < n; i++)
{
if (a[i] % m == l)
cout << a[i] << " ";
}
return 0;
}
Вот код...
