Поскольку не указан язык программирования, приведу код программы на языке С++:
#include <iostream>
using namespace std;
int main(){
int one, two, three;
cin >> one >> two >> three;
cout << "Average height: " << (one+two+three)/3 << endl;
return 0;
}
Uses crt;
var a:array[1..4] of integer;
sum,i:integer;
begin
clrscr;
writeln('Введите 4 целых числа:');
for i:=1 to 4 do
begin
read(a[i]);
if a[i]mod 3=0 then sum:=sum+a[i];
end;
writeln('Сумма чисел, кратных трем: ',sum);
<span>end.</span>
1) Костюм;
2) Фон;
3) Алгоритм;
4) Игра;
5) Анимация;
6) Цель;
7) Уровень;
8) Персонаж;
9) Скрипт;
10) Сценарий.
Надеюсь ответ достаточно полон.
Удаление
копирование
перемещение
вставка
Существуют три вида циклов <span>на языке Pascal:
1) цикл с параметром (с известным числом повторений) for; используется, когда известно, сколько раз выполнится цикл;
2) цикл с предусловием while; используется, когда неизвестно число выполнений цикла и цикл выполняется, пока условие верно;
3) цикл с постусловием repeat; </span>используется, когда неизвестно число выполнений цикла и цикл выполняется до истинности условия.<span>
Примеры.
1) найти сумму первых 10 натуральных чисел:
s:=0;
for i:=1 to 10 do s:=s+i;
write(s);
2) найти сумму всех натуральных четных чисел в промежутке от 7 до 45:
s:=0; i:=8;
while i<45 do
begin
s:=s+i;
i:=i+2
end;
write(s);
3) </span>найти сумму всех натуральных четных чисел в промежутке от 7 до 45:
s:=0; i:=8;
repeat
s:=s+i;
i:=i+2
until <span> i>45;</span>
write(s);