Точная задача по Техническому Заданию:
var x,y:integer;
begin
writeln('введите два числа');
readln(x);
readln(y);
if (x<1000000001) and (y<1000000001) and (x>0) and (y>0)
then writeln('сумма чисел =',x+y)
else writeln('диапазон чисел неверный');
end.
Если вдруг вам поверит учитель, можете перевыполнить поставленную задачу:
var x,y:integer;
s:string;
begin
randomize;
writeln('взять ли числа случайными? Ответ да или нет');
readln(s);
if (s='да') or (s='Да') or (s='ДА') or (s='дА') then begin
x:=random(1000000000);
y:=random(1000000000);
writeln('сумма чисел =',x+y);
writeln('произведение чисел =',x*y);
end
else begin
writeln('введите два числа');
readln(x);
readln(y);
writeln('сумма чисел =',x+y);
writeln('произведение чисел =',x*y);
end;
end.
Program NoName;
Var i,n,sum: integer;
a:array[1..9999] of integer;
Begin
sum:=0;
Write ("Количество элементов массива = ");
Read (n);
For i:=1 to n do
Begin
Writeln(a[i]);
End;
Writeln ;
For i:=1 to n do
Begin
If a[i] < 20 then
a[i] := a[i] * 3;
sum:=sum + a[i];
Writeln(a[i]);
End;
Write (sum);
End.
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
int a, b, c, x;
cin >> x;
if ( x<=999 ) {
a = (x / 100)%10;
b = (x / 10)%10;
c = (x / 1)%10;
if ( a == b && b == c && a == c){
cout << "Все цифры одинаковые" <<endl;
} else if ( a == b || b == c || a == c ){
cout << "Есть одинаковые цифры" << endl;
} else {
// (по усл. не треб.) cout << "Все цифры разные " <<endl;
}
}
return 0;
}
Человека составляют один процент. Соответственно
мороженое = 60*3 = 180 человек
шоколад = 20*3 = 60 человек
карамель = 10*3 = 30 человек
мармелад и зефир = 5*3 = по 15 человек