НАЧАЛО ПОКА нашлось (19) ИЛИ нашлось (299) ИЛИ нашлось (3999)
заменить (19, 2)
заменить (299, 3)
заменить (3999, 1)
КОНЕЦ ПОКА
КОНЕЦ
На вход этой программе подаётся строка длины 101, состоящая из цифры 1, за которой следуют 100 идущих подряд цифр 9. Какая строка получится в результате применения программы к этой строке
найти ошибку в программе Паскаль
begin
var s := '1' * 99 + '9' * 98;
while (pos ('19',s)> 0) (pos ('299',s)> 0)or (pos ('3999',s)> 0)do
begin
var i1:= pos ('19',s);
var i2:= pos ('299',s);
var i3:= pos ('3999',s);
if ('19'<> 0) or ('299'<> 0) or ('3999'<> 0) then
begin
delete (s,'19',2);
insert (s,'2',i1);
delete (s,'299',3);
insert (s,'3',i2);
delete (s,'3999',4);
insert (s,'1',i3);
end;
end;
writeln (s)
end.
#include <iostream>
using namespace std;
int min(int v, int w){
if (v > w){
return w;
}else{
return v;
}}
int minimum(int a, int b, int c){
int min1, min2;
min1 = min(a,b);
min2 = min(min1,c);
return min2;
}
int max(int v, int w){
if (v > w){
return v;
}else{
return w;
}}
int maximum(int a, int b, int c){
int max1, max2;
max1 = max(a,b);
max2 = max(max1,c);
return max2;
}
int main() {
int a, b , c , d,min3,max3,e;
cin >> a >> b >> c;
min3 = minimum( a, b, c);
max3 = maximum( a, b, c);
e = (max3 - min3 )/2;
d = (a + b + c)/3;
cout << d + e;
}
Объяснение:
решение на с++