Написать программу!!!!!
дана непустая последовательность целых чисел, оканчивающихся нулем. Найти количество всех членов последовательности.
Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqIntegerWhile(t->t<>0).Count.Println
end.
// Внимание! Если программа не работает, обновите версию!
begin
ReadSeqIntegerWhile(t->t<>0).Count.Println
end.
Ответ дал:
0
Смешная задачка в одну строку...
Ответ дал:
0
Оу, не успел)
Ответ дал:
0
А можете эту же программу написать с использованием цикла с параметром
Ответ дал:
0
Просто мы такое еще не проходили
Ответ дал:
0
Если "не проходили", значит и не будете проходить.
Ответ дал:
0
//PascalABC.NET
//Версия 3.3, сборка 1611 (06.01.2018)
begin
var a:=ReadSeqIntegerWhile(t->t<>0).Count.Println;
end.
Пример:
1 2 3 4 5 6 7 8 9 0
9
//Версия 3.3, сборка 1611 (06.01.2018)
begin
var a:=ReadSeqIntegerWhile(t->t<>0).Count.Println;
end.
Пример:
1 2 3 4 5 6 7 8 9 0
9
Ответ дал:
0
Я знаю, что хранится только 1 число, это количество
Ответ дал:
0
Но по-сути в начале то последовательность)
Ответ дал:
0
Ну и зачем его хранить, если уже вывели? ))) Вам даже компилятор даст предупреждение, что этого не надо делать)))
Ответ дал:
0
Он этого не сделал(
Ответ дал:
0
Да ну? "e.pas(2) : Переменной 'a' присвоено значение, но оно нигде далее не используется"
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад