1)
var n,a,s,i:integer;
begin
write('n = ');
readln(n);
writeln('Введите ',n,' чисел:');
s:=0;
for i:=1 to n do
begin
read(a);
s:=s+a;
end;
writeln('s = ',s);
end.
2)var n,a,s,i:integer;
begin
write('n = ');
readln(n);
writeln('Введите ',n,' чисел:');
s:=0;
i:=0;
repeat
i:=i+1;
read(a);
s:=s+a;
until i=n;
writeln('s = ',s);
end.
3)
var n,a,s,i:integer;
begin
write('n = ');
readln(n);
writeln('Введите ',n,' чисел:');
s:=0;
i:=0;
while i<n do
begin
i:=i+1;
read(a);
s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
n = 5
Введите 5 чисел:
8 2 9 6 4
s = 29
Вам какой язык надо? Пример на python:
#s - данная строка
def check_for_duplicates(s):
return len(s.split()) != len(set(s.split())) # возвращает True, если имеются одинаковые слова
Это на С++:
#include <stdio.h>
int main ()
{
int a = 0, b = 0, c = 0;
scanf ("%d %d %d", &a, &b, &c);
printf ("%d+%d+%d=%d\n", a, b, c, a+b+c);
printf ("%d*%d*%d=%d\n", a, b, c, a*b*c);
printf ("(%d+%d+%d)/3=%f", a, b, c, (a+b+c)/3.0);
}
для 3го ложное!у него кол-во букв четное и первая согласная
3.
сhаr
int
flоаt
bool (ну или boolean, смотря какой язык)
4.
Паскаля не знаю :( Напишу на C++:
#include <iostream>
using namespace std;
int main(){
int a,b;
cin >> a >> b; //Прочитали значения через пробел.
cout << (a+b)*2 << endl;
return 0;
}