Трехцикловая программа для суммы 10 последовательных членов в паскале!!!!!!!
10-11 класс
|
program D1KPxx;
uses crt;
var
i,k,sum:integer;
begin
for i:=1 to 10 do
begin
read(k);
sum:=sum+k;
end;
writeln(sum);
end.
program D1KPxx1;
uses crt;
var
i,k,sum:integer;
begin
while i<=9 do
begin
read(k);
sum:=sum+k;
inc(i);
end;
writeln(sum);
end.
program D1KPxx2;
uses crt;
var
i,k,sum:integer;
begin
repeat
read(k);
sum:=sum+k;
inc(i);
until i>=10;
writeln(sum);
end.
что значит трехцикловая? тремя разными циклами?)
нет 3 цикла вроде как. честно задание неккоректное девушка написала я сам не понял я бы сделал еслиб я понял что кроется за этим
или наверно просто - программа для суммы 10 последовательных членов
узнал. даа,ты прав с 3мя циклами разными
Другие вопросы из категории
Умножить трехзначное число, введенное с клавиатуры на 2, если оно содержит в своей записи хотя бы одну единицу.
Проверить истинность высказывания: «Ладья за один ход может перейти с одного поля на другое». 2) Дано трехзначное число. Проверить истинность высказывания: «Все цифры данного числа различны». 3)Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных A и B.
чную0,138 перевести 2,8,16 ичную0,6124 перевести 8,1693,......155 перевести 2,8,16
Читайте также
2) Заданы действительные числа a , b , c и d . Написать программу нахождения полусуммы наименьшего и наибольшего из них.
3) Написать программу для вычисления суммы цифр числа , введенного с клавиатуры
Помогите прошу
X - Y и вывода значения величины Z. Протестировать программу для X=5.5, X=0, X=-10.2
2. Составить программу для упорядоченное двух элементов по убыванию.
алгоритм,определяющий через какой промежуток времени первоначальная сумма увеличится в 2 раза.
мер в таблице.Произвести отладку и проверить работу программы для произвольно заданных элементов таблицы. ПОЖАЛУЙСТА ПОМОГИТЕ ХОТЬ ПРОГРАММУ СОСТАВИТЬ!!! СРОЧНО)