Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиПоискОблакоVK ComboВсе проекты

Программа в PASCALABC.NET

- Ученик (119), на голосовании 1 месяц назад
Составить программу для Решения задачи используя цикл «ДО» на PASCALABC.NET
Голосование за лучший ответ
ALOS Знаток (355) 2 месяца назад
 ## 
var (x, y) := ReadReal2('Введите x и y:');
var (N, i, sum) := (11.3 * Sqrt(y + 6), 1, 0.0);
repeat
sum += i * i;
Inc(i)
until i > 10;
N -= 5 * x * sum;
Print(N)
-Ученик (119) 2 месяца назад
Program1.pas(4) : Встречено 'repeat', а ожидался идентификатор
ALOSЗнаток (355) 2 месяца назад
Все нормально работает
- Ученик (119) ALOS, так это же не цикл "Пока"
ALOSЗнаток (355) 2 месяца назад
В вопросе что написано?
Составить программу для Решения задачи используя цикл «ДО»
- Ученик (119) ALOS, а можно через пока?
Похожие вопросы