59

Требутся ввести 20 чисел и посчитать сумму этих чисел. Мы проходим сейчас язык…

14 марта 2023

Требутся ввести 20 чисел и посчитать сумму этих чисел. Мы проходим сейчас язык паскалия и этт нужно написаьь в программе чтоб оеаработала

категория: информатика

60

var i, t, Summ: real; begin Summ: =0; for i: =1 to 20 do begin write ('Введите число '); readln (t); Summ: =Summ+t; end; writeln ('Summ=', Summ); readln; end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...