Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 05.10.2009
Сообщений: 14
1

Составьте две программы в Pascale ABC с циклами For или While

18.11.2009, 18:34. Показов 1114. Ответов 2
Метки нет (Все метки)

№1
Составте программу для вычисления суммы чисел кратных 5 в диапазоне от 1 до 100!??


№ 2
Составте программу выводящую на экран четырёхзначные числа у которых первая и последняя цифра раны.!!!??

Заранее всем спасибо.. =))
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.11.2009, 18:34
Ответы с готовыми решениями:

Огонь на Pascale (или ABC, или Free, или Turbo)
Пожалуйста, обрадуйте кто нибудь, кодом Движения Огня на Pascale.

Требуется разработать две программы (или одну с двумя циклами) с использованием операторов повтора (циклических операторов) WHILE и REPEAT
расчитать \sum_{\propto }^{n=1}{-1}^{n}\frac{1}{n(2n+1)} c точностью \alpha 0,001 Нужно...

Снег на pascale abc
Ребят помогите пожалуйста, мне нужно нарисовать падающий снег, вообще не получается(((

Форма в Pascale ABC
Парни и девушки, у меня курсовой проект, и я запарился на фоне в форме, незнаю как вставить...

2
Retired
7721 / 2553 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
18.11.2009, 18:40 2
Лучший ответ Сообщение было отмечено Катенька =)) как решение

Решение

1:
Pascal
1
2
3
4
5
6
7
8
9
var
  i:integer;
begin
  writeln('Íàéäåííå ÷èñëà:');
  for i:=1 to 100 do
    if i mod 5 = 0 then
      write(i,' ');
  writeln
end.
Добавлено через 1 минуту
Цитата Сообщение от Катенька =)) Посмотреть сообщение
Составте программу выводящую на экран четырёхзначные числа у которых первая и последняя цифра раны.!!!??
можно ли вам использовать строки? или надо все таки делать через div mod?
0
Платежеспособный зверь
8737 / 4162 / 1604
Регистрация: 28.10.2009
Сообщений: 11,281
18.11.2009, 18:41 3
№1
Составте программу для вычисления суммы чисел кратных 5 в диапазоне от 1 до 100!??
Pascal
1
2
for i:=1 to 10 do
if i mod 5=0 then s:=s+i;
или

Pascal
1
2
for i:=1 to 20 do
s:=s+5*i;
№ 2
Составте программу выводящую на экран четырёхзначные числа у которых первая и последняя цифра раны.!!!??
Pascal
1
2
for i:=1000 to 9999 do
if i div 1000=i mod 10 then writeln i;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.11.2009, 18:41

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

программа в Pascale ABC с цмклом While
Составте программу, выводящую на экран четные числа от 10 до 20, по одному числу в строке! ...

соединить эти две программы в одну Pascal ABC
соедините эти две программы в одну вот условие самой задачи:Используя процедуры ввода данных в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.