Люди, помогите пожалуйста!
Я вот набросал код на С++ - перепишите пожалуйста на TurboPascal. Идея проги вроде понятна из комментариев, но на всякий случай расскажу отдельно:
Программа с помощью цикла repeat..uint предлагает пользователю ввести число и суммирует их, пока не будет введен 0. Если пользователь введет 0 - выходим из цикла, вычисляем среднее арифметическое введенных чисел и выводим на экран сумму всех чисел и их среднее арифметическое... Только нужно чтобы цикл был именно repeat..iunt. Код с самого начала требовался на TurboPascal"е, я набросал его на С++ чтобы показать логику работы кода....
Код на С++:
#include <iostream.h>
#include <conio.h>
/*
Сначала создаем необходимые для работы переменые
input - сюда будет помещаться введенное число
count - здесь будет храниться количество введенных чисел
result - сюда будут суммироваться введенные числа
average - среднее арифметическое введенных чисел
Ссылка на пост
11 фев 2010 в 10:48