program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.
Ответ дал: Гость
program xxx;
var d, x1, x2, y1,y2 : real;
begin
write('введите координаты 1 точки: ');
readln(x1, y1);
write('введите координаты 2 точки: ');
readln(x2, y2);
d: =sqrt(sqr(x2-x1)+sqr(y2-y1));
write('растояние между точками =', d);
readln
end.
Ответ дал: Гость
а-1; мама-4; весна-5 - количество букв
а-1; шея-2; мама-2; огурец-3 - количество гласных
а-0; шея-1; мама-2; огурец-3 - количество согласных
Ответ дал: Гость
1)
высказывание не (не а и b) будет ложным когда высказывание
(не а и b) будет истинным, оно в свою очередь будет истинным когда
будут истинны одновременно высказывание не а и высказывание b
то есть когда а ложное а в истинное
2)
число 376 трехзначное и четное
а=число 376 трехзначное
в=число 376 четное
а и в
или
если сумма цифр числа делится на 3, то число делится на 3
Популярные вопросы